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NOUVEAU 


3490 F TTC 

Nouve au lecteur de disquette 3", double têtes, double faces ■ 500 K •octets directement adressables sans retourner la disquette pour 3490 F 

LA PUISSANCE NOUVELLE POUR ORIC 1 ET ATM0S( 


JASMIN est un produit de T R A N . ORiC 1 et ATMOS sont des produits ORlC LTD 

ion compacte â fiabilité accrue 


Lecteur et contrôleur en un seul boîtier. Alimentation sépa- 
.aise assurée par DATTEL ■ Aix en Provence, utilisant les der- 


Nouvelle c 

i;',' ;■ seuieur ro|i I' ' jsse Bl I 
niers cris de la technologie. 

La puissance du JASMIN vient de son fameux système d'exploitation de disque FTDOS (marque déposée de Technologie Recherche et Applications 
Nouvellesl. Chargement ultra rapide : 48 K octets en moins de 5 secondes. 50 instructions indispensables pour les applications de gestion et scienti¬ 
fiques et plus de 5 utilitaires. Le FTDOS est chargé en mémoire parallèle, laissant disponible entièrement la mémoire réservée à l'utilisateur. Fichiers à 
accès direct à l'enregistrement. Fichiers séquentiels. Accès direct aux secteurs - Matrices - Copie directe de cassettes à disquette. En prime un logi¬ 
ciel de fichier à accès direct sur plusieurs clés « REPERTORY-FICH ». 

Lecteur MONO 2 tètes. 3490 F TTC 

Lecteur supplémentaire. . 2490 F TTC 

Lecteur DUO 2 tètes. . .. . 5980 F TTC 

Disquette Vierge. . . 65F TTC 


CREDIT POSSIBLE 


double tète + EASYTEXT + REPERTORY FICH + livre 

». 3990 F TTC 

REPERTORY-FICH -i- MULTIFICH 

. 4490 F TTC 

EASYTEXT -t- MULTIFICH -i- IMPRIMANTE 


D) 1 JASMIN MONO 

« TDOS et ses fichiers ». 

E) 1 JASMIN MONO double tète -i- EASYTEXT 

-f livre « TDOS et ses fichiers ». 

F) 1 JASMIN MONO Double tète 


JASMIN PRINTER + REPERTORY-FICH -i- livre . 


TDOS et ses fichiers 

6980 F 


TTC 


Ensemble D. 3990,00 F TTC 

A la commande.390,00 F TTC 

et 1 2 mensualités de.345,03 F TTC 

Taux TEG 24,90%. Coût du crédit 550,36 F 

Ensemble F. 6980,00 F TTC 

A la commande.. 580,00 F TTC 

et 18 mensualités de. 432,36 F TTC 

Taux TEG 24,90% . Coût du créd it 1382,48 F 
Pour tout renseignement 
Téléphoner au (94) 21.19.68 
Monaiaur FOLQOA8 


Tout ce qu'il faut pour traiter votre courrier ainsi que la gestion de vos fichiers (en langage machine, moins de 4 secondes pour retrouver une fiche) 

V^ASMIN^UÎTnFJ^HJ Puissant logiciel de gestion de fichiers é accès direct sut plusieurs critères. Plus de 12000 fiches possibles sur lecteur 
double tètes Edition plein écran. Masque de saisie programmable sur plusieurs pages Tri sur n’importe quelle rubrique Toute combinaison avec S cri¬ 
tères de comparaison et 2 opérateurs de liaison Logiciel en langage machine rapide Protection logique par tampon, contre micro coupure Mailing 
Pour toute imprimante. Prix de lancement 

• iFAflMFI AfIBïïMPl.FUB » p...».»»! Assembleur Désassembleur symbolique trois passes. Editeur pleine page Numérotation et Renumérota 
tion automatique Occupation minimale de la mémoire centrale par assemblage sur disque. Nombre de labels illimité et possibilité d'opération sur les 
labels Travail aussi dans la mémoire • overlay • : 

• r raitement de TEXTE complet avec tout caractère accentué. ïambage descendant 70 caractères spéciaux Plus de 30 
. .ji-uiMn<i>'s cl édition. Souligné Justification é droite, centrage, caractères gras ou double taille, tabulation décimale, transfert de bloc, recherche et 
permutation de chaînes. Glossaire de formules usuelles Concaténation Commandes pilotables par un programme BASIC IMAILINGI Longueur de 
ligne lusqu'é 255 caractères. Pagination automatique. Très grande facilité d'emploi Compatible SEIKOSHA 100 et 500. CGP 220. BROTHER EP 
22 et EP 44. MANESMAN TALLY. RITEMAN. EPSON RX80FT. EM 60 lé margueritel JASMIN PRINTER 

• L .1 nouvelle imprimante professionnelle silencieuse. Matricielle, mats qualité courrier. Double impression Jambage 

iii'M i nii.iiu Toute accentuation Graphique. Matrice 9 x 9. 50 CPS Impression bi directionnelle Jusqu’é 132 car ligne. Caractères 
1 - 1 .iiijis I nniionsés’gras'graphiques'grecs mathématiques etc.. . Entrainement Feuille é Feuille ou accordéon Interface parallèle Centronics (En 
option : entrainement à Picot ou rouleaux, interface RS232CI . . 

IBIBLIOTHI 

Toutes les explications sur le TOOS Nombreux exemples et listings sur les fichiers à accès direct et séquentiel 
Le TDOS et ses fichiers pour ORIC 1 et AMOS (Beaufils et Arnaud) 1 50 F TTC 

Apprenez l'électronique sur ORIC et ATMOS (P. Beaufils) : 1 10 F TTC 

Disquette d'accompagnement : 1 30 F TTC 

— Quel rebelle viendra é bout de MAXIMILIEN LE TYRAN Plusieurs jours de révolution exaltante Le Rebelle 
est mis é prix . 300 F TTC 

— Aux commandes de voue vaisseau intersidéral, coloniset de nouvelles planètes et devenez le maître 
incontesté de la galaxie des trois soleils : LES CONQUERANTS 300 F TTC 

(Précisez une tête ou 2 tétesl 

VOUS QUI AVEZ DES PROGICIELS ET LOGICIELS POUR JASMIN, CONTACTEZ NOUS 
Demandez notre catalogue détaillé Possibilité de paiement échelonné, nous téléphoner 


690 F TTC 


490 F TTC 


690 F TTC 


2740 F TTC 


LA GAMME JASMIN près de chez vous 
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Noire spéciaksie Loficiel : COCONUT 75011 355.63.00 
NotrekMiahB VISMO 75012 338.60.00 


BON DE COMMANDE è recopier et è envoyer 

T.R.A.N. sari. - 53, impasse Blériot 

83130 LA GARDE -Tél : (94) 21.19.68 

Nom :. 

Adresse :. 

Code Postal :. Ville . 

Date ; . Tél . 


Forfait de Port Express an France : 40 F TTC 
Port gratuit pour commanda de plus de 1.000.F TTC. 


Désignation 

Quantité 

Px umt TTC 

Mt TTC 

















Cifosn un chéqua 

quo voua n'anca«aar«x qu'é raxpédition da Tapparaii 



































































COBRA PJNBALL 140 F 

Ptu6 btioin rfe pKUQjiteA. COBRA PINBALL, 
une. iup&K iimutution de. {^tippt'i pancumé- 
tiubte.. Au TOP-TEhl, p’iemÀ^e.fL HÂX-paxoide. 
du loQÂjileZ iZ eAt en ma'ii iz 

N°1 

l/odZà quZ -6e pa6iz dz zommzntoÂAZi... 

MEURTRE A GRAM?E VITESSE 180 F 

Lz logXxu.eZ. Iz plui ofilglnat 6u>i mi.zKO- 
OKdlnautzuKi. Pou>i zn iavoVi ptui voyzz 
Lz numz>io 6 (mani) dz THEORIC PAGE 12. 
Et pcLn.tJjcJipzz au gxand zonzouai o^gant- 
iz auzz Tkioatz... 

"Un aoup dz maJitKZ ! Noui atmoni bzau- 
zoup MzuKtaz à gaandz vitZ66z" {Jzux 
et St'Lotzgtz avaXÂ-mat 85). 

1815 160 F 

Un uiaa-gantz baàz iun. tz6 zampagnzi napo- 
Lzontennzé. "Un vzaXtablz voaa-gamz, tazé 
zompLet, tazi {^azLLz à jouzua et dz 6 uk- 
zfLOit dz tKZJii bonnz qualttz" (Sztznzz £ 
Vtz Mtzao maa-i 85). 

KIT - PROGRAMMEURS 290 F 

Poun. Izi ^anaé dz La pnogaoumatton et 
zzux quÀ. vzuLznt 6'y mettaz... un zn- 
éembLz LndXjtpzniabLz zn SUPER PROMO ! 

- Lz Ltvaz AU COEUR VE L’ATMOS paa 
GXJLLZ6 BERTW (L'autzun. dz Cobaa 
PtnbaLL). 

- Lz 6 LoglzleZé KIT'ECRAN, ORIC BASIC +, 
V'.A.O et CARACTOR. 

(VoLzu'l gLobaLz nonsnaLz : 515 F). 



LOGICIELS 

Jeux 

Utilitaires 

Educatifs 

COBRA SOFT : unz gammz untquz dz Logtzteté 
poun. mtzno-ondtnatzuni ORIC-7, ATMOS, TO 7, 
MO 5, AMSTRAV, etz... 

COBRA SOFT pnopo6z 30 tXtnz6 poun ORIC-7 
et ATMOS. Voua pouvez nzzzvotn Lz zatcuLo- 
guz zompLet en. nznvoyant Lz bon zt-dz6- 
60 U 6 zn pnzzJiAant "zataLoguz" et zn jot- 
gant unz enveJLoppz ttmbnzz avec votnz 
adnzAéz. Voua pouvez zgaLemznt voua nz- 
^znzn aux THEORIC pnéjzédentA danA Le^AquetA 
VOUA tnouvznzz Lz dzAzntptt^ et Lz pntx 
dz zhaquz pnognammz COBRA SOFT. 


COBRA 

Ces logiciels sont en vente dans 
les boutiques spécialisées ou par 
correspondance en écrivant à cette adresse : 

COBRA SOFT 5, av. Monnot 71100 CHALON/S 

Auteurs et distributeurs, contactez-nous ! 

NOM . 

ADRESSE . 

CODE POSTAL . VILLE . 

Veuillez me faire parvenir les programmes suivants : 
-titre-prix - 


(les prix sont TTC). Port : 10 F 

Cl-Joint mon réglement soit : Total: . 




































POUR vous ••• 



COMMUNIQUEZ AVEC VOTRE ZX81 

D. BONOMO ^ E. DUTERTRE 

Progromm«v. interfaces, périphériques pour tirer le moximum de votre ZX 61 

2* édition. 90 f 


COMMUNIQUEZ AVEC ORIC ET ATMOS 

D. BONOMO — E. OUTERTRE 
Mêmes thèmes que pour le ZX6I, mois odoptés 
pour ORIC'1 et ATMOS 


145 f 


LES MYSTERES D'ALICE 
OU LA PRATIQUE DU 6803 

A. BONNEAUD 

L'un des nseilleurs ouvrages sur le sujet — 240 pages 15 î E 


LES MYSTERES DU LASER 

D. BOURQUIN 

Ou le Loser mis à nu et livrant tous ses secrets — 200 pages 
où chaque mot o son importance 


148 f 


INTERFACES POUR ORIC-1 ET ATMOS 

M. LEVREL — F6DTA 

Ce livre vous permet de foire diaio 9 uer votre ordinateur 

ORiC'l ou ATMOS ovec son environnement. 59 F 


APPRENEZ L'ELECTRONIQUE 
SUR ORIC/ATMOS 

P. BEAUFILS 

Une méthode visuelle pour comprendre les phénomènes électroniques. 59 F 


PROGRAMMES POUR ORIC 

E. JACOB — J. PORTELLI 

Série de progrommes compotibles 50 F 


LASER INFO 

(Pour Laser 200/3000) 

N* 1 et 2 disponibles contre 30 F en timbres ou chèque 


MEGAHERTZ HORS SERIE 

Oe nombreux programmes pour toutes sortes 
de mochines 

30 F en timbres ou por chèque 


JOUEZ AVEC HECTOR 

I. DUTERTRE 

Des programmes simples pour Hector 48 F 


JOUEZ AVEC AQUARIUS 

L. 6ENTY 

Toute une série de progrommes 45 F (poche} 


NAVIGUEZ SUR ORIC ET ATMOS 

E. JACOB — J. PORTELLI 

Utilitoire pour lo navigation qui semble également permettre 

de jouer au navigateur. 45 F (poche) 

EXTENSIONS POUR ZX81 

E. DUTERTRE 

la monière de s'en servir I 48 F (poche) 

BIEN PROGRAMMER SUR 
ORIC ET ATMOS 

M. ARCHAMBAULT 

Plein de trucs astucieux surtout lorsque l'on connoit l'auteur I 10 F 


• Accès i 
le Rem 
Overlay 

• Trois 

imprnnontei 
à Tessei 

• "hü 

Assembitar 

• Jouet fvec 


UTILISATEURS D'ORIC ATMOS 
NE RESTEZ PLUS ISOLES 

Lo revue mensuelle THEORIC est un lien indispensoble 
Elle vous permet d'ètre deux fois por semaine en lioison ovec 
un technicien, d'ovoir les progrommes sur disquettes, etc. 

1 I rsunséros por on Un exemplaire de presse contre 30 F en timbres 

HECTORIEN 

(Journal des utilisateurs d'Hector) 

N* 1 et 2 disponibles contre 30 F en timbres ou chèque 


LOGICIELS POUR ORIC ATMOS 

POOPY t pour que les petits s'omuseni 

WATER PANIC t un jeu d'orcodes en longoge mochine sur un thème que 
personne n'avoil encore osé aborder 
EDITEUR ASSEMBLEUR 
de M. BART ovec son livret pour ORIC ATMOS 


80 r 
80 r 

ISO F 


✓ 













EDITO 

Vous êtes nombreux à nous écire, que dis- 
je, à nous appeler au secours à la suite de 
problèmes rencontrés avec l'importateur 
officiel d'ORIC. 

Nous comprenons votre désarroi, mais nous 
sommes dans l'obligation de vous faire 
observer que nous ne sommes pas une asso¬ 
ciation de consommateurs ! Tout au plus 
pouvons-nous, et nous l'avons fait, dénon¬ 
cer des abus. 


La direction de l'importateur officiel d'ORIC 
ATMOS a changé. Les projets sont ambi¬ 
tieux, et la remise en place, presque une res¬ 
tructuration, est en cours. Accordez-leur un 
délai. Ils ne sont malheureusement pas au 
courant de tous les événements précédents, 
mais sont pleins de bonne volonté. C'est 
déjà un grand changement. 

S. FAUREZ 
Directeur de 
publication 


RELIER S OU PLUSIEURS ORIC^ ET ATMOS AU MEME PROGRAMME... 



DIALOGUE 



S5 ko de libre pour vos programmes, part:icipat;ion 
multiple, transfert de texte, de graphisme,... 

Raccordements (décrits) par prise cassette (cordons vendus 


dans le commerce, toute liaison "audio"envisageable). 

le programme, jeu démonstration, notice..^SO F ORIC 1 A ATMOS 

UTILISATIONS SPECIALES ( PROF SERVEURS I NOUS CONSULTER 


OAMAE....jen de dames avec sauvegarde de partie en cours. atmos.120F 

ELEPHORM...jeu de mémoire sur des formes. 17 fig. 39 niveaux. atmos. 100 F 
ELEPHCOLOR....jeu de mémoire sur les couleurs et nuances ...ATMOS. 100 F 

CLAVIDACT.. ..méthode de frappe. atmos.120 F 


port: 15 F . réglement à la commande REVENDEURS NOUS CONSULTER 


[J fl I 

S»E§1 


fit' 


80 rue dea fourniers 
07500 GUILHERAIMD 

tel 75.404844 
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DERNIERE MINUTE... 

Dans le but de mieux vous ser¬ 
vir, les petites annonces payan¬ 
tes prévues pour une parution 
dans THEORIC, sortiront aussi 
dans la revue MEGAHERTZ 
(Informatique et Communica¬ 
tion). Elles seront également 
envoyées aux abonnés de ce 
journal, par courrier séparé, une 
quinzaine de jours avant sa paru¬ 
tion en kiosque. 

Nous vous offrons trois supports 
pour le prix d'un I Des chances 
supplémentaires pour vendre 
votre matériel. 


Editorial. 5 

Nouvelles . 7 
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Biblioric .11 
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Couverture d'après un dessin de Christophe PERRIN, 
réalisé sur ORIC-1 et GP50. 
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QUEL AVENIR POUR ORIC ? 


D ébut mai avaient lieu des 
événements importants à 
Paris : le SICOB et la Foire de 
Paris. Aux deux, le matériel ORIC 
et la société ASN Diffusion 
étaient présents. Une conférence 
de presse était organisée le 6 mai 
par les représentants d'ASN. 
Monsieur Claude TAÏEB, spécia¬ 
lement venu de Marseille, nous a 
présenté les objectifs de sa 
société. 


Entre mars 1980 et mars 1989, 
trois personnes se succéderont à 
la présidence d'ASN : M. Denis 
TAÏEB (mandat achevé en 83), 
M. Claude TAÏEB (actuel Prési¬ 
dent), M, Jean TAIEB qui sera 
mandaté de 86 à 89. Ce système 
devrait garantir un renouvelle¬ 
ment dans les idées émises... 
M. Claude TAÏEB, en prenant la 
parole, a souligné que la période 
de mutation vécue pa la micro- 
informatique familiale était res¬ 
sentie par ASN. Il a aussi évoqué 
les problèmes de démagogie chez 
les journalistes, dont l'intégrité ne 
va pas toujours dans le sens de 
l'intérêt pour la micro... Tiens ? 
Revenons-en à ORIC : en 83, un 
contrat d'exclusivité est signé 
avec ASN, sur la base de 4000 
micros par mois... payés au 
comptant. Parallèlement à cela, 
ORIC Angleterre a essayé de pro¬ 
mouvoir son produit partout en. 
Europe, pour éviter de n'avoir que 
la France comme client. 

Mai 1984 : début des difficultés 
chez ORIC Angleterre. 20 000 
ORIC étaient "séquestrés" par 
les banquiers. ORIC France (ASN) 
intervient et assure un soutien 
financier. En échange, ASN 
obtient un contrat de "licence" 
de commercialisation et fabrica¬ 


tion sur 5 ans. Les noms d'AT- 
MOS et STRATOS sont déposés 
et appartiennent à ASN qui pour¬ 
rait, dès lors, fabriquer ces machi¬ 
nes en France... si l'envie lui en 
prenait. 

ORIC Products a déposé le bilan 
et recherche des partenaires en 
France. ASN est d'accord, mais 
seulement un contrat à long 
terme, pour se garantir d'une 
politique incertaine. M. Denis 
TAIEB, déjà membre du directoire 
d'ORIC Angleterre, serait 
l'homme idéal pour relancer l'af¬ 
faire (meilleur partenaire du 
syndic, connaissance des problè¬ 
mes, etc.) De toute façon, le 
syndic n'a pas dénoncé le contrat 
existant entre ASN et ORIC Pro¬ 
ducts. Enfin, les bonnes relations 
passées et présentes avec ASN 
Diffusion devraient servir à M. 
Denis TAIEB. 

Au jour où avait lieu la confé¬ 
rence, aucune décision n'était 
encore prise. C'est aux alentours 
du 16 mai qu'elle devrait interve¬ 
nir. Nous vous donnons donc 
rendez-vous dans un prochain 
numéro pour la suite du feuille¬ 
ton. 

Le prix des ATMOS est en baisse. 
ASN préconise la vente à un prix 
voisin de 1600 F. D'autres reven¬ 
deurs, alimentés par un marché 
parallèle, le fournissent à 1000 F 
environ. M. Claude TAIEB a sou¬ 
ligné le risque encouru par les 
acquéreurs de ce type de maté¬ 
riel provenant de stocks non tes¬ 
tés ou parfois en panne... Vrai ou 
faux ? A vous de juger, et si vous 
êtes confronté au problème, 
n'hésitez pas à nous le faire 
savoir I 

Quant au STRATOS, un exem¬ 
plaire était présenté sur le stand 
d'ASN au SICOB. Nous avons pu 


toucher et retourner ce prototype 
pour l'examiner sous toutes ses 
coutures. Il ressemble à l'AT¬ 
MOS, en plus grand... Nous n'in¬ 
sisterons pas la dessus puisque 
nous avons déjà présenté ses 
principales caractéristiques. Son 
arrivée est prévue en France 
autour du nriois de juin ; ASN 
prend déjà des commandes. I 
Les réponses à nos questions 
concernant le produit et sa date 
de sortie sont restées assez éva¬ 
sives. Il est vrai que ASN vise un 
autre créneau : le MSX I 
L'importation et la distribution 
exclusive du GOLDSTAR FC 200 
seraient assurées par ASN, l'ac¬ 
cord ayant été signé à Séoul 
(COREE) le 2 mars 1985. M. 
Jean-Pierre MARTIN, directeur 
commercial de ASN Diffusion a 
présenté le produit lors de la 
conférence de presse. Les prix 
sont attractifs mais le standard 
MSX n'arrive pas à s'imposer en 
France. Il est vrai que les MSX 
sont assez souvent associés à 
des consoles de jeux évoluées. 
De plus, dans la gamme de prix, 
il existe un produit plus perfor¬ 
mant et beaucoup mieux placé au 
rapport qualité prix : l'AMSTRAD 
CPC 464 et bientôt le CPC 664. 
Les estimations de vente des 
MSX en 84 sont de l'ordre de 
5 % du marché et seraient de 
35 % en 85 (chiffres annoncés 
sous réserve par M. J-P. MAR¬ 
TIN). Le contrat signé par ASN 
avec GOLDSTAR prévoit la vente 
de 20 000 machines en un an. 
Souhaitons-leur "bonne chance" 
et retournons au clavier de notre 
cher ORIC, car il n'est pas mort, 
et près de 100 000 machines 
sont en circulation en France : de 
quoi motiver les créateurs poten¬ 
tiels I 
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NOUVELLES ET NOUVEAUTES 
LIVRES 

BIEN PROGRAMMER (Soracom) 
de M. ARCHAMBAULT 

LOGICIELS 

DIALOGUE (Bleu-Ciel Informati¬ 
que) permet d'établir la commu¬ 
nication entre deux ordinateurs. 
LE RETOUR DU DOCTEUR 
GENIUS (Loriciels). Jeu d'aventu¬ 
res graphique. 

MATERIELS 

Interface Minitel pour ORIC 
(Mageco). Comment profiter du 
MODEM du Minitel et conserver 
les écrans-images sur impri¬ 
mante. 


Le prix de l'ORIC est en baisse, 
vous le saviez déjà. ORIC France, 
par la voix de ASN, le propose 
même à crédit, avec son moni¬ 
teur monochrome ou sans. La 
formule classique du "satisfait ou 
remboursé" avec essai 15 jours. 
Il est vrai que le risque n'est pas 
grand : on est vite séduit par un 
ATMOS. 

Sur le marché parallèle, on le 
trouve encore moins cher : à 
990 F ( -(- 80 F de câble et alimen¬ 
tation Péritel). A ce prix, ATMOS 
entre en concurrence directe 
avec des ntachines beaucoup 
moins performantes que lui ; SIN¬ 
CLAIR ZX81-I-16 k, MATRA 
Alice.. Le prix en Angleterre est 
peut-être encore plus bas I 


DERNIERE MINUTE 

Afin de tenir compte des obser¬ 
vations formulées par les pre¬ 
miers utilisateurs de MULTIFICH, 
une nouvelle version a été élabo¬ 
rée, rendant les "Mailing" beau¬ 
coup plus faciles. 

De même, les prénoms pourront 
être écrits en minuscules (sauf la 
première lettre). 

Voilà un logiciel qui évolue dans 
le bon sens I 


Une radio qui parle d'informati¬ 
que... et de THEORIC. C'est à 
Bordeaux, la capitale du bon vin 
(aïe I les Bourgignons vont m'as¬ 
sassiner I). 

Elle émet sur 100,7 MHz et s'ap¬ 
pelle ANGORA. 

Micro-Flash est une chronique 
quotidienne diffusée du lundi au 
samedi à 8hl5 et 19h45. 
Revue de presse, les lundi et 
mardi. 

Affûtez vos antennes et écoutez 
ANGORA 100,7 MHz. 



Si vous êtes responsable d'une 
radio ou d'une émission d'infor¬ 
matique, n'hésitez pas à contac¬ 
ter la rédaction de THEORIC pour 
faire connaître vos activités. 


LA REDACTION 
DEMENAGE... 

Toujours dans le but de mieux 
vous servir, la rédaction prend 
ses aises et quitte ses locaux étri¬ 
qués. L'opération se passera en 
deux temps puisque nos bureaux 
définitifs ne sont pas encore 
prêts. Notre nouvelle adresse, 
provisoire, est donc la suivante : 

Le Grand Logis 

10, Av. du Gai. de Gaulle 

BP 46 

35170 BRUZ 

Quant au téléphone, il devient : 
(99) 52.98.11 ou 52.98.02. 


LES CLUBS 
ARTIC 

Anne et Robert Turgot 


Informatique Club 
23, rue Bordin 
78500 SARTROUVILLE 

Le club ARTIC (10 instituteurs + 
64 élèves de 3 classes du CP au 
CM2) fonctionne pour le moment 
avec 3 ATMOS prêtés par les 
membres. Nous recherchons 
tous contacts avec d'autres amis 
ORICIENS. 

Le club fonctionne pendant les 
heures de classe et le soir (réu¬ 
nion mensuelle entre ensei¬ 
gnants). 

ON RECHERCHE : Un club ORIC 
dans la région de Juvisy/Orge. 
Prière de se faire connaître. 

MODEM DTL 2000 

M. Pierre MILLOT (91 ) 06.21.02 
M. P. SCHMITT (8) 797.81.45 

MODEM TONIC 

M. Marc TRUSCH (1) 771.70.11 
(contacts locaux exiusivement) 


TRUCS ET ASTUCES 

M. SZABO — 74 Annemasse 

Votre clavier ne répond plus 
après un certain temps de fonc¬ 
tionnement ? Il est possible que 
cela vienne du AY 8912 (géné¬ 
rateur sonore) dont le port sert à 
la gestion du clavier. 

Pour améliorer son fonctionne¬ 
ment (si le retour en SAV a été 
sans effet et, surtout, si votre 
ORIC n'est plus sous garantie et 
que vous êtes à l'aise avec un fer 
à souder), vous pouvez procéder 
à l'intervention suivante : 

— couper la piste reliant 18 de 
IC4 à 19 de IC6 sur quelques mil¬ 
limètres, 

— souder un condensateur 
miniature de 1 nF aux deux extré¬ 
mités de la coupure, 

— souder une résistance de 22 Q 
1/4 W entre 6 de IC4 et 18 de 
IC4. 

C'est la modification qui a été 
effectuée sur la machine de notre 
lecteur. 
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VITRINE 
DU LOGICIEL 


"Starter 3D" 
Simulation coursa 
auto 

LANSCAPE 
130 F 

Une course 
automobile en 3D 
(trois dimensions, si 
vous n'avez pas 
compris I) comme si 
vous y étiez. En fait, 
vous y êtes puisque 
c'est vous qui pilotez 
l'un des bolides et, 
croyez-nous, ça n'est 
pas facile. 

Après avoir chargé le 
programme, on vous 
demandera de 
regarder la jaquette 
de la cassette, non 
pas parce qu'elle et 
jolie, mais surtout car 
on y trouve une de 
ces petites grilles 
colorées anti-piratage 
Ne vous trompez pas 
en répondant, le code 
du chiffre 
correspondant à la 
couleur de la case 
demandée : entre le 
gris et le vert-de-gris 
passé, il n'y a qu'une 
nuance, et vous 
n'aurez qu'un autre 
essai. Gare aux 
distraits I J'en 
connais qui vont 
charger la cassette 
plusieurs fois... 

Cette première 
épreuve accomplie, 
vous allez découvrir la 
présentation des 
touches qui vous 
serviront de 
commande : direction, 
accélérateur, freins. Si 
vous attendez 
quelques secondas, 
vous aurez droit à 
une démonstration. La 


Fl s'élance dans un 
vrombissement de 
moteur et les 
difficultés du parcours 
s'offrent à vos yeux : 
flaques d'huile, 
virages vicieux... Le 
mode démonstration 
est trompeur car la 
voiture passe sur les 
flaques d'huile sans 
déraper, et les virages 
sont pris bien 
rapidement. La réalité 
est assez différente I 
La notice vous 
apprendra que vous 
devez accomplir deux 
tours de circuit pour 
vous qualifier ; après 
cela, vous aurez droit 
à une place sur la 
grille de départ, 
fonction de vos 
performances. Les 
nôtres étaient nul les, 
malgré plusieurs 
tentatives, nous 
n'avons pu participer 
à la course : 
dommage I 
Deux tours de 
qualification, ça 
semble bien difficile, 
et il aurait été 
préférable de diminuer 
les critères d'accès à 
la course, en la 
proposant par une 
option du menu. Si 
vous accédez à la dite 
course, il vous faudra 
dépasser le maximum 
de concurrents ; au 
quatrième accident, 
vous serez éliminé. 

Si l'on exclue la 
monotonie engendrée 
par la difficulté 
d'accès à la course 
elle-même, le jeu est 
assez réussi. 

Bruitages 

(accélération moteur. 


crissement de pneus 
dans les virages) 
qu'on ne peut 
malheureusement pas 
éliminer, graphisme 
3D (arbres et 
panneaux au bord de 
la route, nuages dans 
le ciel, petit village...) 
sont d'un bel effet. 

"Cours de Basic" 
Didacticiel 
JRD 
250 F 

Un cours de Basic 
avec votre ORIC, 
voilà un bon moyen 
pour prendre contact 
avec la micro. Nous 
avions testé, 
précédemment dans 
ces colonnes, un 
logiciel de ce type, 
mais il était peu 
convaincant. Celui-ci 
semble de bien 
meilleure facture. Son 
prix (sans jeu de mots 
avec ce qui précède) 
paraît un peu élevé, 
mais le logiciel se 
compose en fait de 
deux cassettes 
accompagnées d'un 
manuel d'une 
cinquantaine de 
pages, proprement 
relié. Le manuel et le 
logiciel se complètent, 
et le second fait 
souvent appel au 
premier. 

La présentation 
prévoit, au choix, 
l'utilisation d'un écran 
monochrome ou 
couleurs. Dans ce 
cas, vous pourrez 
sélectionner une 
encre verte ou bleue. 
Le cours est ponctué 
de questions 
auxquelles vous 
devrez répondre. Elles 
sont présentées sous 
forme QCM 
(questions à choix 
multiples) à trois 
positions. Selon votre 


réponse, vous aurez 
droit à une petite 
musique, macabre ou 
guillerette. C'est bien, 
mais il est des fois où 
on aimerait avoir une 
sourdine : le logiciel 
ne prévoit pas cet 
accessoire. 

Les leçons sont très 
progressives. Faute 
de temps, nous ne les 
avons pas suivies 
d'un bout à l'autre. 

Ça nous aurait fait du 
bien puisque nous n'y 
connaissons rien à 
l'informatique. 
D'ailleurs, c'est 
décidé, nous allons 
nous recycler et 
THEORIC parlera 
bientôt de pêche à la 
ligne. 

Commençant fort 
logiquement, par les 
instructions les plus 
I simples à utiliser, le 
logiciel abordera 
l'utilisation du 
graphisme haute 
résolution et du son. 
La présentation est 
claire et progressive 
et un test en fin de 
leçon permettra 
d'évaluer votre 
niveau. 

Parfois, certains 
points auraient pu 
être mieux illustrés, 
ou certaines 
affirmations mieux 
démontrées par le 
programnie (exemple 
leçon 1, paragraphe 6 
à propos de 
l'affichage du Ready 
après un END). Nous 
avons également 
relevé une erreur 
(PRINT suivi d'une 
virgule ne sépare pas 
de 3 blancs, comme 
l'affirme le cours, ou 
alors notre ORIC a un 
Basic spécial I 
Dans l'ensemble, le 
logiciel, écrit 
entièrement en Basic, 
est très correct et 
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devrait séduire les 
débutants qui 
préfèrent les travaux 
pratiques à la simple 
lecture d'un livre sur 
le Basic. Il pourrait 
alors être pour eux la 
toute première 
acquisition. 

"3D FONGUS" 
Adresse 
LORICIELS 
140 F 

Nous n'avons pas osé 
écrire "genre : 
pilotage" car ce n'est 
pas un simulateur, 
contrairement à ce 
que pourrait laisser 
penser la jaquette (et 
le texte au dos) de la 
cassette. Il vous 
faudra de l'adresse et 
beaucoup de réflexes 
pour piloter le petit 
avion que vous avez 
sous vos yeux, car 
vous devez rester, si 
possible, entre les 
poteaux matérialisant 
la piste. 

Le but du jeu : suivre 
le parcours balisé 
pour atteindre le 
champ de cristal. 
Certains obstacles 
sont là pour vous 
donner des points, 

] d'autres vous en 
ôtent implacablement, 
j Vous n'avez jamais 
! vu un avion voler 
dans un souterrain ? 

Si vous découvrez 
l'entrée du passage, 
vous aurez le privilège 
de voler "s^us la 
terre", mais attention, 
ne touchez pas au 
Fongus, champignon 
mortel qui ne doit être 
! survolé sous aucun 
prétexte. 

Côté technique, ce 
n'est pas mal du tout, 
surtout si on tient 
I compte des 
, limitations 
intrinsèques de l'ORIC 


et de sa gestion 
d'écran. L'effet 3D 
est très réussi : les 
obstacles grandissent 
et foncent à votre 
recontre (ceci est 
surtout vrai avec les 
rhinocéros contre 
lesquels votre avion 
ne fera pas le poids). 
Rochers, cactus, 
nuages dans le ciel, 
aucun détail n'a été 
oublié, pas même 
l'ombre de votre 
avion sur le sol. Au 
cinquième choc, il en 
sera fini de votre 
voyage et vous 
monterez au ciel I 
Niveau du jeu et 
niveau sonore sont 
réglables. Le 
programme est assez 
original I 

"Bla... Bla... Bla..." 
MICROPUCE 

Ce n'est pas une 
blague, c'est bien le 
titre, d'ailleurs on 
n'est plus au mois 
d'avril mais en mai ! 
Pompeusement 
baptisé "logiciel de 
traitement de la 
parole" et soi-disant 
"très performant", il 
nous a passablement 
déçus. Faire parler 
ORIC n'est pas chose 
facile et, nos lecteurs 
le savent pour avoir 
expérimenté le 
programme VOICE 
paru dans ces 
colonnes, le faire sans 
synthétiseur vocal est 
encore plus délicat. 
Tant qu'on se limite à 
enregistrer des mots 
complets ("merci", 
"bonjour", "salut"..) 
pour les faire répéter 
par la suite, tout va 
bien, surtout si on 
prend soin de bien 
ajuster le niveau 
injecté dans l'ORIC au 
moment de la mise en 


I mémoire. Dès qu'on 
se hasarde à 
découper les mots en 
"phonèmes", on 
cherche la difficulté 
(du moins par le 
procédé retenu dans 
ce logiciel), et les 
' résultats sont peu 
I probants. Nous avons 
1 fait l'expérience 
consistant à 
demander à des 
personnes non 
habituées d'identifier 
les phrases 
prononcées par 
l'ORIC : le taux de 
réussite est 
extrêmement bas... Il 
faut dire que le temps 
de traitement en 
Basic n'arrange pas 
les choses... 

Deux programmes 
sont présents sur la 
cassette. Le premier 
permet d'enregistrer 
et de restituer des 
phrases ; c'est la 
même chose que 
VOICE. Le second 
(celui que nous 
critiquons le plus) 

I propose de prononcer 
des mots qu'on 
décompose en 
phonèmes. Le tout 
est livré avec une 
fiche DIN contenant 
un petit 

' condensateur, 
rebouclant la sortie 
magnéto de l'ORIC 
vers l'entrée de 
l'ampli BF... Les 
concepteurs du 
logiciel semblent ne 
pas avoir trouvé le 
I moyen de sortir 
directement sur le 
générateur sonore, 
sans passer par cet 
I appendice. 

' Micropuce nous avait 
habitués à mieux, et 
si vous désirez faire 
parler votre ORIC, 
réfléchissez avant 
d'acheter cette 
I cassette... 
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"TRIATHLON" 
Simulation sportive 
ERE Informatique 
150 F 

Ils ne sont pas 
nombreux, les jeux de 
simulation sportive 
sur ORIC. Celui-ci est 
de présentation fort 
soignée. Vous êtes 
accueilli par une 
statue du "discobole" 
qui vous fera 
patienter pendant les 
quelques minutes 
requises pour le 
chargement. 

Vous allez devoir 
accomplir trois 
épreuves : tir à l'arc, 
aviron, haltérophilie. 

Le passage de l'une 
vers l'autre ne pourra 
se faire qu'après 
qualification. Plus que 
de la force physique, 
c'est surtout de la 


concentration qu'on 
vous demandera... 
Première épreuve ; le 
tir à l'arc. La scène 
est vue de dessus, 
l'archer à gauche de 
l'écran, juges et 
spectateurs sagement 
assis sur leurs chaises 
de part et d'autre du 
couloir de tir. Le tir 
s'effectue sur une 
cible mobile, défilant 
à droite de l'écran. 
Pour corser le tout, 
un vent de force 
variable vous souffle 
dans le dô*s. L'appui 
sur la barre d'espace 
déclenche le tir, son 
maintien agit sur 
l'angle de site. Pour 
réussir, il faut faire un 
minimum de points, 
en deux manches. 
C'est de loin 
l'épreuve la plus 
facile... 


Seconde épreuve ; 
l'aviron. Elle se 
déroule sur un lac sur 
fond de montage. 
Vous devrez lutter 
contre ORIC dont le 
bateau est au premier 
plan. Pour ramer, 
deux touches qu'il 
faudra actionner dans 
un synchronisme 
parfait si vous voulez 
avoir une chance de 
vaincre : c'est loin 
d'être évident ! 
Troisième et dernière 
épreuve : 

l'haltérophilie. Deux 
essais vous seront 
accordés pour réaliser 
un "épaulé-jeté". 
Notions de force et 
d'effort sont, là 
encore, obtenues au 
moyen de deux 
touches : c'est 
l'épreuve la moins 
facile et, peut-être, la 


BIBLIORIC 

I "Le T-DOS et ses 
fichiers" 

P. BEAUFILS 
C. ARNAUD 
TRAN 
150 F 


Si vous possédez le 
Jasmin de Tran, vous 
serez certainement 
amené à lire cet 
ouvrage qui permet 
de tirer le meilleur 
parti du T-DOS. Il 
représente un 
excellent complément 
de la notice fournie 
avec le lecteur de 
disques. Les auteurs, 
semblant considérer 
que leur livre 
remplacera la notice, 
ont décrit jusqu'aux 
opérations de mise en 
service du système. 
Pas à pas, vous serez 
guidé à la découverte 
du T-DOS et de sa 
syntaxe. Formatez 
une disquette et 


suivez les exercices 
proposés par les 
auteurs en 
commençant par les 
opérations de base 
(SAVE, DEL, COPY, 
CAT, etc.). 

La manipulation des 
fichiers de données 
est certainement le 
plus gros morceau à 
avaler quand on 
débute avec une 
disquette : vous 
aborderez ce domaine 
avec un maximum 
d'informations. 
Définition d'un fichier, 
choix (et critères de 
choix) du type 
serviront 

d'introduction à leur 
manipulation. 

Recopie, extension, 
suppression, 
classement, 
traitement d'erreurs, 
fichiers séquentiels et 
accès direct sont 
décortiqués et 
illustrés d'exemples à 
la fois nombreux et 


didactiques. Vous 
pourrez apprendre 
ainsi à bâtir votre 
propre gestion de 
fichiers, grâce aux 
programmes 
documentés, et vous 
initier aux différentes 
méthodes de tri en 
choisissant la plus 
adaptée à vos 
besoins. 

La dernière partie de 
l'ouvrage est très 
intéressante car elle 
indique comment 
utiliser le Jasmin en 
langage machine. 
Accès à la RAM 
Overlay, transfert du 
DOS, carte mémoire 
du T-DOS et points 
d'entrée des routines. 
Vous y découvrirez le 
"bit mapping" qui 
vous permettra de 
décortiquer les 
disquettes. Un 
exemple d'utilisation : 
le classement d'un 
catalogue par ordre 
alphabétique. 


plus originale. 

Vous monterez sur 
une des marches du 
podium olympique en 
fonction de votre 
succès aux 
différentes épreuves. 
Cela se fera avec, en 
fond musical, le 
célèbre et pompeux 
Te Deum de 
Carpentier. L'aspect 
solennel est relevé 
par quelques 
drapeaux multicolores 
en haut du stade. 
C'est bien réalisé, 
agréable au niveau du 
graphisme et du son 
et, comme vous 
pouvez jouer tout seul 
(le jeu admet jusqu'à 
quatre joueurs), vous 
pourrez vous entraîner 
avant de défier vos 
amis. 


Ce livre représente 
une mine 

d'informations (ou 
tout au moins, celles 
que les auteurs ont 
pu découvrir). Il est 
clair, bien structuré et 
écrit dans un langage 
permettant à 
l'utilisateur de 
découvrir son Jasmin 
pour en profiter 
pleinement. Seule 
ombre au tableau : le 
prix un peu élevé de 
ce livre de 200 
pages... 
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LES PROGRAMMES DE JEU 


"MULTIFICH" 

Utilitaire 

TRAN 

690 F support disquette 

Enfin une gestion de fichiers digne de ce nom, pour 
rORIC. Il aurait peut-être fallu l'appeler "Désirée" I 
Elle tourne sur le Jasmin de TRAN, et nous avons 
reçu l'une des toutes premières disquettes, accom¬ 
pagnée d'une notice provisoire. Ah, la-notice I 
C'est certainement ce qui pêche le plus sur beau¬ 
coup de logiciels ; celle-ci présente quelques points 
obscurs, qui devraient être corrigés sur la version 
définitive, qui ont provoqué quelques fausses 
manipulations et recherches un peu longues, mais 
pour le reste, elle est bien faite. 

En attendant vos avis (utilisateurs, contactez- 
nous), nous vous présentons, en quelques lignes, 
ses principales caractéristiques. 

Nous avons effectué ce test "en novice", en nous 
plaçant dans la peau d'un utilisateur non- 
informaticien et peu habitué à ce genre de logiciels. 
MULTIFICH a été écrit par Alexandre GESP, auteur 
de EASYTEXT et JASMIN ASSEMBLEUR. Il per¬ 
met de stocker, de rechercher, de trier, d'impri¬ 
mer des informations mises sous forme de fiches. 
Chaque disquette est divisée en 9 blocs de 4400 
octets par face. Selon la taille de la fiche, vous 
pourrez en mettre 200 à 800 par bloc. Sur les 
"double tête", ces capacités sont doublées. Cha¬ 
que fiche est décomposée en rubriques (255 au 
maximum) de 255 caractères (maximum). 
Lorsqu'on initialise un fichier, on définit le masque 
de saisie de la fiche "type" ; cette opération 
revient à créer les différentes rubriques de la fiche. 
Notez que ce masque pourra être modifié ultérieu¬ 
rement s'il ne vous convenait plus. 

Des informations vous sont fournies sur le nom¬ 
bre de fiches, le numéro de la fiche en cours, le 
pourcentage d'occupation de la disquette lors de 
vos créations ou modifications. L'éditeur est du 
type "plein écran". Les touches peu utiles ont été 
redéfinies pour les voyelles accentuées. 

Tout le travail s'effectue en RAM, les fiches n'étant 
copiées sur disque que sur demande. Ce système 
d'utilisation d'un buffer n'écrasant pas l'ancienne 
fiche est une bonne protection contre les coupu¬ 
res d'alimentation. Le passage entre les options 
s'effectue à travers un menu permettant de : 

— modifier les rubriques d'une fiche (intitulé), 

— entrer de nouvelles fiches, 

— modifier des fiches, 

— rechercher des fiches, 

— imprimer des fiches, 

— effacer des fiches, 

— modifier certains paramètres du logiciel, 

— transférer vers un autre ordinateur, 

— trier le fichier. 

Nous ne détaillerons pas tous ces points. Sachez 
simplement que les critères de recherche sont 
nombreux et portent sur ies rubriques, le tri ne peut 


LE MOT LE PLUS LONG 01-M 
COMBINAISONS 02-38 
SAUVETAGE 02-40 
CODE . 03-60 
DRAPEAUX 04-38 
VISIORIC 05-22 
DESCENTE 05-36 
MASTER MIND 06-42 

LES UTILITAIRES 

DUMP ET DESASSEMBLEUR 01-26 
RECOPIE HIRES CP 100 01-31 
LA TOUCHE PONCTION ATMOS 01-36 
NUMEROTATION AUTOMATIQUE ATMOS 01-44 
SAUVEGARDE D'.UNE PAGE HCR/TXT 01-58 
NUMEROTATION AUTOMATIQUE 02-17 
MOT DE PASSE 02-24 
UTILITAIRES A GOGO 02-32 
CONVERT 02-48 
GEREZ VOS PROGRAMMES SUR JASMIN 03-30 
MOTS-CLES AU CLAVIER 03-36 
TRACEUR DE COURBES 03-48 
SYN'THETIS 04-16 
recopie HIRES SUR CP 50 04-30 
ADRESSE DEBUT FIN SUR JASMIN 04-50 
COMMANDE REMOTE PAR FUNC 05-09 
SCAT 05-28 
CORRECTION BUGS MONITEUR 1.0 05-38 
ENVELOPPES 05-50 
CARTE DE FRANCE 05-56 
AUTOVERIF 06-19 
VOICE 06-25 
RECOPIE HIRES MCP 40 06-30 
RENUM DESTRUC 06-31 
HORLOGE ET INTERRUPTIONS 06-36 
RESET AU CLAVIER 06-40 
ANALYSE DE DISQUETTES 06-47 

BIBLIORIC 

GUIDE PRATIQUE DE L'ORIC (CCDIC-NATHAN> 01-42 
DES PROGRAMMES POUR VOTRE ORIC (CEDIC-NATHAN) 01-43 
ORIC-1 POUR TOUS <PSt) 01-43 
PROGRAMMES POUR VOTRE ORIC (SORACOM) 01-43 
PILOTEZ VOTRE ORIC-1 » ATMOS (ETSF) 02-46 
INTERFACES POUR ORIC-1 ET ATMOS (SORACOM) 02-47 
PRATIQUE DE L'ORIC-1 (EDIT. RADIO) 02-47 
L'ORIC A L'AFFICHE (PSI) 02-47 
LA DECOUVERTE DE L'ORIC (PSI) 03-16 
PREMIERS PAS EN PROGRAMMATION SUR ORIC (EOIMICRO) 03-16 
AU COEUR DE L'ORIC ATMOS (ARC INFOR.) 03-16 
ORIC-1 A LA CONQUETE DES JEUX (EYROLLES) 03-17 
MANUEL DE REFERENCE POUR ATMOS ET ORlC-1 (IS) 03-17 
ORIC ET SON MICROPROCESSEUR (MICROPROGRAMMES 5) 04-13 
INITIATION A L'INFORMATIQUE (LONDREYS) 04-13 
102 PROGRAMMES (PSI) 04-13 
ORIC PREMIERS PROGRAMMES (SYBEX) 04-13 
NAVIGUEZ AVEC ORIC-1 ET ATMOS (SORACOM) 04-13 
APPRENEZ L'ELECTRONIQUE SUR ORIC (SORACOM) 04-14 
L'ASSEMBLEUR DE L'ORIC (PSI) 05-14 
DES EXTENSIONS A CONSTRUIRE (EYROLLES) 05-14 

VITRINE DU LOGICIEL 

XENON (UK) 01-39 
STRlP-21 (MICROPUCE) 01-40 
HOPPER (PSS) 01-40 
JC DECOUVRE LC MONDE ANIMAL (SQUIRELLE) 01-41 
SIMULA'TEUR OC VOL (PRORICICL) 01-41 
MISSION DELTA (ERE) 02-44 
DON JUAN (NO MAN'S LAND) 02-45 
COMPATIBLE (MICROPUCC) 02-45 
L'AIGLE D'OR (LORICICLS) 02-45 
RCVERSI CHAMPION (LORICICLS) 03-54 
MONOPOLYC (FREE GAME) 03-54 
FIRCFLASH (NO MAN'S LAND) 03-55 
4 JEUX DIFFERENTS 03-55 
ZOOLYMPICS (NO MAN'S LAND) 04-10 
DOCCY (LORICieL.S) 04-10 
POOPY (MICROLOGIC) 04-11 
ORICRAPH (MICROFUTUR) 04-11 
TIC-TAC (LORICICLS) 04-11 
COURS DC BASIC (ENTRCPRISC) 04-12 
LA TOUR FANTASTIQUE (NO MAN'S LAND) 05-11 
PINBALL (COBRA) 05-11 
CALCUL MENTAL (LORICICLS) 05-12 
UNE AFFAIRE EN OR (FREE GAME) 05-12 
WATER-PANIC (MICROLOGIC) 05-13 
LORIGRAPH (LORICICLS) 06-10 
TITAN (1NFOGRAMMES) 06-11 
CLAVIDACT (BLEU CIEL) 06-12 
NEUTRE GRANDE VITESSE (COBRA) 06-12 
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être que croissant ou décroissant (là encore, au 
niveau de la rubrique). 

Pour l'imprimante, plusieurs options d'édition ont 
été retenues, ce qui confère une grande souplesse 
d'emploi (et adaptation au matériel) à ce logiciel. 
Des caractères de contrôle peuvent être envoyés 
à l'imprimante, ainsi que des chaînes de caractè¬ 
res intermédiaires. Ceci permet d'envisager la mise 
en page ou en tableau des différentes informations. 
IRAN annonce l'interconnexion possible de l'ORIC 
avec un autre ordinateur, par l'intermédiaire du 
logiciel, mais nous n'avons pas cherché à exploi¬ 
ter ces possibilités. 

Le logiciel est, bien évidemment, protégé, mais une 
partie de MULTIFICH est recopiable sur n'importe 
quelle autre disquette. Elle pourra alors être utili¬ 


sée au sein d'un autre logiciel. L'exemple suggéré 
par la notice est celui d'un traitement de "mailing". 
L'autre face de là disquette contient un petit exem¬ 
ple d'application de MULTIFICH. 

En ce qui nous concerne, nous avons utilisé 
MULTIFICH pour classer tous les articles et pro¬ 
grammes parus dans THEORIC. Nous vous propo¬ 
sons ci-après ce récapitulatif sorti sur imprimante. 
Les applications de MULTIFICH sont nombreuses 
et variées. Au niveau individuel, on peut envisa¬ 
ger de classer des disques ou les ouvrages de sa 
bibliothèque. Ce qui nous intéresse, c'est de 
connaître l'avis des utilisateurs "professionnels" 
du logiciel, notre conclusion provisoire étant qu'il 
nous semble rapide, souple et agréable à utiliser. 


M. Pierre LUCAS — 91 Epinay 

Peut-on, avec SCAT, transférer 
des programmes sur disquettes ? 

SCAT a été conçu pour faire des 
copies de cassette à cassette. Il 
faudrait le modifier assez sérieu¬ 
sement pour changer la partie 
sauvegarde par l'appel des rou¬ 
tines du DOS permettant l'accès 
à la disquette. Ces modifications 
ne sont pas simples, mais restent 
envisageables. Nous allons y 
réfléchir ! 

M. J.P. AGNES - 33 Bordeaux 

Est-il possible de connecter ORIC 
directement à un MINITEL ? 

Directement, non I Mais il existe 
un nouveau produit (interface et 
logiciel) permettant de faire ce 
couplage. Nous reviendrons dans 
nos colonnes sur cette extension 
fabriquée par MAGECO. 

M. Henri ABEILLE - 13 Marseille 

Possesseur d'un ATMOS depuis 
peu, j'ai voulu pouvoir me servir 
de "JOY STICK". Je me suis 
donc rendu à la FNAC du centre 
bourse à Marseille. Là, on m'a 


vendu une interface "JOY 
STICK" fabriquée par la société 
MAGECO Electronic et une paire 
de "JOY STICK". 

A partir de là, mes ennuis ont 
commencé : 

— Personne ne m'avait averti 
qu'il fallait taper un prograrnnne : 
novice en la matière, cela n'a pas 
été facile car je n'avais pas tout 
de suite compris l'importance des 
espaces. J'ai fini par réussir à le 
taper correctement. 

— Une fois tapé le programme, 
les "JOY STICK" ne voulaient 
pas fonctionner. 

— Je me suis donc rendu à la 
FNAC où l'on ma répondu : 
"Nous, on vend le matériel, mais 
on ne sait pas le faire fonction- 
ner . 

— Je me suis rendu au magasin 
de la société ASN, 20 rue Vita- 
lis, 13005 Marseille, société 
chargée de diffuser le matériel 
ORIC et ses accessoires sur la 
région. Là, il m'a été répondu 
"nous commercialisons l'inter¬ 
face en question que nous ven¬ 
dons régulièrement à la FNAC. 
Mais nous ne savons pas le faire 
fonctionner ; nous ne pouvons, 
en effet, connaître tout notre 
matériel". 

— J'ai fait le tour de tous les 
magasins de Marseille, même 


réponse. Il faut ajouter que, dans 
les trois quarts des cas, l'erratum 
nécessaire à la modification du 
programme pour l'utilisation sur 
l'ATMOS n'accompagnait pas 
l'interface. 

— J'ai enfin téléphoné à la 
société MAGECO (1 ) 336.08.45, 
28 bis rue Pascal, 75005 Paris, 
où un technicien m'a enfin 
répondu : Nous sommes au 
courant de ce problème ; ces 
interfaces ne fonctionnent que 
sur certains jeux les plus anciens 
les nouveaux jeux sont depuis 
longtemps étudiés pour fonction¬ 
ner avec une autre interface dite 
programmable dont le coût est 
d'environ 450 F. 

Quand on distribue du matériel 
informatique avec des vendeurs 
qui n'y connaissent rien (ou si 
peu), le résultat est garanti : le 
client est mécontent. 

Lisez l'extrait de la lettre de M. 
ABEILLE, et posez-vous les 
mêmes questions que lui : 

— Est-il normal de vendre des 
produits dont on ne connaît pas 
le mode de fonctionnement ? 

— Une société comme ASN, est- 
elle crédible quand elle ne connaît 
même pas ses propres appareils 
dont la gamme est pourtant limi¬ 
tée ? 
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EUPHORIC 


M. Claude OUDIETTE - 49 

Nous fait part, dans une lettre 
dont nous reproduisons ci-après 
dans son intégralité le passage 
significatif, des problèmes ren¬ 
contrés par l'utilisateur d'un logi¬ 
ciel acquis sur cassette, et qui 
voudrait assurer son transfert sur 
disquette. Est-il normal de ne 
pouvoir le faire ? Doit-il payer 
davantage 7 Doit-on expliquer 
dans les revues de vulgarisation 
la procédure qui conduirait au 
"déplombage" du logiciel ? 
Autant de points que nous sou¬ 
mettons aux lecteurs et éditeurs. 
Méditez ! 

Je possède plusieurs logiciels sur 
cassette édités par A.R.G. Infor¬ 
matique - "FINANCES", "CAR¬ 
NET D'ADRESSES", "ORIC GES¬ 
TION 1", "ORIC GESTION 2", 
"SUPER COPY ECRAN", et je ne 
peux pas les transférer sur dis¬ 
quettes JASMIN pour plusieurs 
raisons : 

— Tous mes essais se sont heur¬ 
tés aux protections des program¬ 
mes, et je ne suis pas assez 
compétent en micro-informatique 
pour contourner ces défenses (et 
je n'ai pas vocation de pirate I). 

— La firme TRAN, pour des rai¬ 
sons tout à fait compréhensibles, 
ne veut pas se charger de ce tra¬ 
vail et, les fonctions du DOS 
étant limitées à la sauvegarde ou 


Pas frais, le rédacteur de CONVE- 
HEX (THEORIC n° 7, page 36), 
quand il écrit 2* = 32. On aurait 
pu croire à un poisson d'avril 
dans ce numéro, mais il s'agit bel 
et bien d'une erreur. Il sera puni, 
soyez-en sûr. Il va copier mille 
fois (sans boucle FOR NEXT) 
2‘ = 16. 


• Dans THEORIC n° 6, une par¬ 
tie du listing assembleur du pro¬ 
gramme Horloge a malencontreu¬ 


à la recopie de programmes à 
usage personnel, ne peut me 
donner de solution technique. 

— La firme ARG a des projets 
d'édition de ces logiciels sur dis¬ 
quettes (et même sur disquettes 
JASMIN I) mais ne peut, elle non 
plus, faire ce travail étant 
complètement débordée ! Tant 
mieux I C'est que les affaires 
marchent ! Mais mon problème 
reste entier I Et tout ceci appelle 
quelques remarques : 

— Il est légitime qu'un client pos¬ 
sédant un lecteur de disquettes 
essaie d'en tirer le maximum et 
le préfère au magnéto-cassette. 

— En faisant l'acquisition des 
logiciels cassette, les droits d'au¬ 
teur ont été payés. Faudra-t-il les 
payer une deuxième fois quand 
ces mêmes logiciels seront édités 
sur disquettes ? (et quand ?). 


M. J.P. AZRA - 75 Paris 

Nous suggère de faire précéder 
nos programmes en langage 
machine par leurs équivalents en 
Basic à des fins pédagogiques. 
Certes, la méthode paraît bonne 
pour des petits programmes de 
quelques lignes, mais elle n'est 
guère envisageable pour des 
"gros morceaux" comme SCAT 
ou VOICE ! Par contre, nous 
essaierons de documenter davan¬ 
tage nos programmes en Assem¬ 


sement "sauté" lors du maquet¬ 
tage (il manque de 959B à 
95AC). Veuillez nous excuser 
pour cet incident. Le listing Basic 
étant, lui, correct, seuls les lec¬ 
teurs travaillant en Assembleur 
ont eu le problème. La zone 
mémoire manquante correspond 
à la ligne 11120 du Basic. 


• Dans THEORIC n° 6 toujours, 
SUPER METEORS lire : 

POKE #6AC9, #46:POKE 


bleur pour permettre une meil¬ 
leure compréhension. 

M. L. BRETON - 72 Le Mans 

Pourquoi ne pas publier dans 
THEORIC la liste des articles et 
programmes concernant l'ORIC, 
parus le mois précédent dans les 
revues d'informatique ? 

Pourquoi pas ? Cette idée est 
retenue, mais nous ne pouvons 
pas faire le tour de toutes les 
revues existantes. Charité bien 
ordonnée commence par soi- 
même : vous trouverez dans ce 
numéro un récapitulatif de tous 
les programmes parus dans 
THEORIC (ainsi que les essais 
logiciels et Biblioric). 

M. J.M. BUISSET - 69 Caluire 

Pourriez-vous publier une recopie 
d'écran HIRES pour GPlOO, uti¬ 
lisant toute la surface du papier ? 

Nous avons reçu plusieurs lettres 
identiques à celle-ci, nous 
demandant une recopie plus large 
pour GP100 et GP500. Le cha¬ 
pitre des recopies sur cette impri¬ 
mante sera définitivement clos 
avec la parution prochaine de 
cette routine. 


#6AD2, #22. 


• Rendons à César... 

Deux noms d'auteurs ont malen¬ 
contreusement disparu lors de la 
mise en page de THEORIC n° 7. 
"Editeur de Caractères" était 
signé M. PHUC LE HONC, 
"Remise en forme des signaux 
cassettes" était une réalisation 
de M. Pierre JULIEN. 

Qu'ils veuillent bien nous en 
excuser. 
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DES TRUCS POUR 


JOUER 


• Sur INVADERS de UK par Eric 
VIEL. 

Pour obtenir un nombre de vies 
supérieur (vous pouvez aller 
jusqu'à 255), faire : 

POKE #26EC, nb de vies 
POKE #2824,96 (RTS) 

• Sur THE ULTRA par Erik GRI- 
COURT 

Pour avoir 255 vies, dès le char¬ 
gement de programme, faire ; 
POKE #6B4, #39 
CALL #5BD 



• Sur ZORGON'S REVENGE 
par... quelqu'un qui n'a pas mis 
son nom sur la feuille. Dom¬ 
mage I 

Si vous n'avez jamais dépassé le 
stade des 4 premiers tableaux, 
voici comment épouser une prin¬ 
cesse et entendre "The Wedding 
March". 


Après avoir chargé votre version 
de ZORGON, faire : 

DOKE #562E, #03A9 
DOKE #5630, #1680 
DOKE #5632, #EA96 


DOKE #5634, #EAEA 
puis RUN. 

Vous disposez alors d'un nombre 
de vies illimité... 



JEU 

SCORE 

AUTEUR 

U 

GALAXIANS 

113 600 

Philippe PASQUER 


INVADERS (UK) 

17 700 

Alex KRAUSS 

QC 

SIMULATEUR VOL 

2 859 

Nicolas RAMPELBERG 


XENON 

81 190 

Bénédicte GARREAU 

O 

HOPPER 

27 140 

James HEUILLARD 


ZORGON 

1 55 830 

E. TOLLEMER 


PAINTER 

103 850 

J.-Philippe MERIC 


HARRIER ATTACK 

73 150 

Nicolas BRUMENT 


MUSHROOM MANIA 

187 952 

Philippe LE MARECHAL 


ULTRA 

30 500 

J-Philippe MERIC 


DRIVER 

66 500 

J-Yves BRUN 


ORION 

49 950 

David DEVIN 


PROTECTOR 

99 594 

Thierry AVANNIER 


ORICMUNCH 

762 187 

Huguette TALLEU 


DEFENCE FORCE 

800 620 

Patrick CHESI 


STYX 

59 850 

Laurent DELHORBE 


DELTA FOOR 

6 920 

Laurent DELHORBE 


TRICK SHOOT 

1 015 

Laurent DELHORBE 


HUNCHBACK 

750 200 

Bénédicte GARREAU 


ULTIMA ZONE 

15 970 

Laurent DELHORBE 


VOTRE COTE D’AMOUR 


JEUX 


QUALITE DE LA REALISATION 


INTERET OU JEU 


L’aigle d'or 

Une affaire en or 

Xénon 

The Ultra 

Hvbert 

Scuba dive 

Zorgon 

Mission Delta 
Waydor 

Le manoir du doct. Genius 
Categorie 

Echecs (LORICIELS) 

Super Jeep 

Monopolic 

Businessman 

Doggy 

Starter 3D 

Diamant Ile Maudite 


UTILITAIRE 


QUALITE DE LA DOCUMENTATION 


INTERET OU LOGICIEL 


CONFORT D'UTILISATION 


Forth 

Moniteur 1.0 
Dric Gestion 1 
Lorigraph 
Oric Basic 
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LE DIAMANT DE LÎLE MAUDITE 


Une aventure signée LORICIELS 
avec la qualité, à la fois dans le 
graphisme et dans l'action... Bon 
nombre de lecteurs sont perdus 
dans l'île ; Renaud DURAND pro¬ 
pose quelques indications qui 
devraient les aider. Il nous propo¬ 
sait également une solution, pour 
la première partie, que nous con¬ 
servons sous le coude, pour vous 
laisser méditer devant les plans 
de l'île et de la tour. 

PLAN DE LA TOUR 

Il était nécessaire de faire un plan 
de la tour, étant donné qu'elle 
n'occupe pas une place logique 
dans le plan général. 

Voici quelques indications : 

— la porte principale de la tour ne 
s'ouvra pas ; 

— le placard ne s'ouvre pas ; 

— l'arraigné se tue avec la mas¬ 
sue ; 

— la clé de la grille est dans le 
paquet de cigarettes qui est dans 
le tiroir. 

PLAN GENERAL 

Le plan est simplifié pour permet¬ 
tre plus de clarté, mais tous les 
objets sont représentés et les 
quelque dessins ne servent qu'à 
se situer. 

Comme l'explique la notice, cha¬ 
que emplacement comprend 4 
rues. Le carré situé au centre de 
chaque case représente votre 
position. D'autre part, voici quel¬ 
ques indications ; 

— la mitraillette ne sert à rien ; 

— la pelle ne sert à rien ; 

— on entre dans la tour par l'ar¬ 
rière ; 

— la trousse de survie n'est pas 
indispensable, vous la prendrez 
en coupant la plante à l'aide du 
couteau qui est dans la tour ; 

— le serpent se tue avec le cou¬ 
teau ; 


— on ne peut descendre sous la 
trappe que lorsqu'on est aveu¬ 
gle ; 


— on accède à la deuxième par¬ 
tie en ouvrant la grille qui est sous 
la trappe. 
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Plan 1 TOUR 
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ALIMENTATION SECOURUE 


M. LE GUYADER 


N ^est-il pas rageant de voir 
EDF interrompre, ne serait- 
ce qu'un court instant, la distri¬ 
bution d'énergie si chère (aux 
deux sens du terme I) à votre 
micro-ordinateur 7 Adieu, le long 
programme en cours de mise-au- 
point, et dont la version réactua¬ 
lisée n'était pas encore sauvegar¬ 
dée sur cassette I 

Quand ce n'est pas EDF, c'est la 
foudre qui tombe, ou le petit der¬ 
nier qui se prend les pieds dans 
le fil traversant la salle de séjour. 
Halte I II est impossible de conti¬ 
nuer à travailler dans ces condi¬ 
tions. Vous qui souffrez de tou¬ 
tes ces persécutions, voici une 
recette qui, pour quelques francs, 
apaisera votre existence. 

Le principe est simple : on rem¬ 
place l'alimentation faisant défaut 
par une batterie d'accumulateurs 
rechargeables (ou à défaut, des 
piles), pendant le temps néces¬ 
saire à la sauvegarde. La commu¬ 
tation, au moment de la coupure, 
est automatique et instantanée, 
assurant ainsi une parfaite sauve¬ 
garde du contenu de la mémoire. 
Si votre magnétophone est ali¬ 
menté par piles (votre téléviseur 
probablement pas I), vous lancez 
votre CSAVE "en aveugle", et le 
tour est joué I Profitez de la cou¬ 
pure pour feuilleter vos anciens 
numéros de THEORIC... ou pour 
comprendre le fonctionnement 
du montage. 

Le composant assurant la com¬ 
mutation est la diode D. D'un 
côté, elle reçoit la tension issue 
de l'alimentation secteur de 
rORIC (environ 10 V), et de l'au¬ 
tre, l'alimentation du bloc accus 
secours (environ 7,5 V). Tant que 
la tension 10 V est présente, la 
diode ne conduit pas, et les accus 
restent sagement au repos (ils 
sont en fait rechargés par R1/R2 
à faible.courant). Dès que la ten¬ 


sion disparaît (coupure secteur), 
la diode achemine l'alimentation 
fournie par les accus vers votre 
ORIC... 

QUELQUES PRECAUTIQNS 

— Ne négligez pas la présence du 
fusible F de 0,8 A ; 

— le montage est prévu pour 
fonctionner avec l'alimentation 
ORIC d'origine. Si vous utilisez 
une alimentation plus généreuse, 
il faudra recalculer RI et R2 pour 
que le courant de charge des 
accumulateurs soit toujours de 
50 mA ; 

— dans le cas d'une alimentation 
plus généreuse, vous pouvez pré¬ 
voir une diode "anti-retour" 
(même type que l'autre) en série 
dans le plus ; 

— enfin, si vos moyens ne vous 
permettent pas d'utiliser des 
accumulateurs, et que vous les 
remplacez par des piles, il faut 
supprimer R1/R2. 

Le montage a été réalisé dans un 
boîtier plastique. Il n'y a pas 
besoin de faire un circuit imprimé, 
aussi, ne téléphonez pas à la 
rédaction pour savoir si le kit est 
disponible... 

FONCTIONNEMENT 

• La mise en marche se fait par 
l'interrupteur I. 

— Dans ce cas, l'intensité de 
charge et presque nulle. 

• L'arrêt se fait par l'interrupteur 
I. 

— Dans ce cas, l'intensité de 
charge est d'environ 50 mA, 

— le temps de charge est d'en¬ 
viron 30 heures (pour RI4 de 
1,2 A/h), 

— l'ensemble peut rester bran¬ 
ché en permanence. 

En cas de coupure secteur, la 
sauvegarde est assurée pour plus 
d'une heure. 


fl 


Bloc 

d* l'ATMOS 




FWi* d'ortgin* 

(« w mllWu, - à r*xtirttur) 



V*rs 

l'ordlMtnr 


F = fusible 0,8 A 

0 = diode BY255 -H- - -a=>- 

R1 = R2 = résistance 150 ohms 1/2 watt 
' = interrupteur (à glissière ou à levier) 

LEO = diode électroluminescente rouge 0 3 
ou 05 



R3 = résistance IkO (1000 0) 1/4 watt 
BLOC ACCUMULATEUR 
6 piles rechargeables R14 1,2 V 1,2 A/h 
(1200 mA/h) 

ou 6 piles rechargeables RI 4 1,2 V 1,8 A/h 
ou 6 piles rechargeables R20 1,2 V 1,2 A/h 
ou 6 piles rechargeables R20 1,2 V 4 A/h 
Note : La première solution est la plus 
économique. 

Prévoir : 1 porte piles 6 x RI4 ou 6x R20 + 
1 coupleur de piles à pression. 
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PRINTER 


Michel ZUPAN 


E t si on parlait un peu FORTH ? 

Langage méconnu et délaissé 
sur les ordinateurs familiaux, il 
offre des possibilités et une rapi¬ 
dité d'exécution telles que son 
étude vaut bien un petit détour. 
Amis du FORTH, voici votre 
page I 

Nous débutons cette rubrique 
consacrée au FORTH par un exer¬ 
cice ambitieux. Il s'agit de créer 
un nouveau vocabulaire dans le 
dictionnaire FORTH destiné à 
gérer l'utilisation d'une impri¬ 
mante. Nous aurons ainsi l'occa¬ 
sion d'aborder les principaux 
concepts qui donnent toute sa 
puissance à ce langage. 

FORTH est un langage structuré 
et modulaire bâti autour du 
concept très large de MOT repré¬ 
sentant pour l'ordinateur une 
tâche élémentaire. L'ensemble 
des mots forme le DICTION¬ 
NAIRE, lui-même structuré de 
façon arborescente en plusieurs 
VOCABULAIRES. 

Pour utiliser un mot pris dans un 
vocabulaire, il convient simple¬ 
ment d'invoquer ce vocabulaire. 
Ceci évite toute ambiguïté entre 
d'éventuels mots identiques de 
vocabulaires différents et permet 
un travail simple et rapide par 
l'utilisation des seuls vocabulai¬ 
res utiles à telle ou telle applica¬ 
tion. 

Avec notre cassette FORTH 
TANSOFT, nous disposons déjà 
de trois vocabulaires : FORTH lui- 
même, véritable tronc commun 
de tout le dictionnaire, EDITOR 
qui simplifie la mise au point des 
sources à l'intérieur des structu¬ 
res que sont les écrans, ASSEM¬ 
BLER qui est un puissant assem¬ 
bleur. Les extensions graphiques 
et sonores ont été plutôt conçues 
comme des excroissances du 


vocabulaire FORTH. 

Dans ces exterisions justement, 
nous trouvons deux mots PON et 
POFF qui consistent à poker (CI 
en Forth) en # 2F1 la valeur 255 
ou 127 selon qu'on désire que 
l'affichage se fasse sur une impri¬ 
mante ou sur l'écran. C'est là une 
bien rustique gestion d'impri¬ 
mante, d'autant que les tabula¬ 
tions vidéo et imprimante ne sont 
pas compatibles. 

Nous allons donc créer un nou¬ 
veau vocabulaire PRINTER qui 
possédera tous les mots d'im¬ 
pression et saura s'adapter au 
cas de chaque imprimante. 
Toute la philosophie du FORTH, 
et c'est là que ce langage est sub¬ 
lime, est représentée par un petit 
noyau de mots utilisant les res¬ 
sources du système hôte, et sur 
lequel sont bâtis, EN FORTH, les 
mots FORTH plus élaborés. C'est 
exactement ce que nous allons 
faire avec notre vocabulaire 
PRINTER. 

Vous savez que FORTH utilise en 
permanence deux PILES de type 
LIFO (First In Last Out, dernier 
entré, premier sorti) qui sont la 
pile des données (DATA STACK) 
et la pile de retour (RETURN 
STACK). La pile de données est 
la pile usuelle de travail utilisant 
les règles de la notation polonaise 
inverse chère aux calculatrices 
HP. La pile de retour est bien 
connue des Oriciens utilisant le 
langage machine : c'est la pile du 
6502. 

Pour notre imprimante, l'opéra¬ 
tion fondamentale consiste à lui 
envoyer un octet, que nous pren¬ 
drons tout naturellement au som¬ 
met de la pile de données. 
Commençons par créer notre 
vocabulaire dans FORTH : 
FORTH DEFINITIONS VOCABU- 
LARY PRINTER IMMEDIATE 


IMMEDIATE permet au mot 
PRINTER d'être exécuté dans une 
définition sans être lui-même 
compilé dans cette définition 
(compliqué ça ?). Précisons que 
nous allons créer des mots dans 
PRINTER et passons en hexadé¬ 
cimal. 

PRINTER DEFINITIONS HEX 

Créons maintenant le mot EMIT, 
synonyme du mot FORTH, 
envoyant l'octet sommet de la 
pile non plus à l'écran mais vers 
l'imprimante : 

CREATE EMIT B586 , B5 , C120 . 
A6F5,4CB5,5EE , SMUDGE 
pour ATMOS. Pour ORIC-1, rem¬ 
placez Cl 20 par 7B20. N'oubliez 
pas les blancs, séparateurs indis¬ 
pensables en Forth de part et 
d'autre des virgules I 
CREATE EMIT crée l'entrée EMIT 
dans le dictionnaire. Suit une 
série de bytes (deux octets) que 
la virgule — un de ces redouta¬ 
bles petits mots Forth — compile 
dans le dictionnaire à la suite 
d'EMIT. , 

Voici la traduction de cette suite 
d'octets compte tenu de l'habi¬ 
tude du 6502 d'inverser octet 
fort et octet faible. 

86 B5 STX XSAVE 

sauve X pointeur de pile de don- 

B5 00 LDA (00,X) 
charge le sommet de pile dans A. 
20 Cl F5 JSR F5C1 
envoie le caractère en A à l'im¬ 
primante (il faut JSR F57B pour 
ORIC-1). 

A6 B5 LDX XSAVE 
récupère X. 

4C EE 05 JMP POP 
supprime le sommet de pile et 
passe au mot suivant. 

SMUDGE termine et valide notre 
définition en complémentant le 
bit de validité de EMIT (encore un 
mystère ?). 
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Et voilà le travail : nous nous 
sommes affranchis des contrain¬ 
tes de rORIC et nous pouvons 
dorénavant construire nos mots 
PRINTER directement en FORTH. 
Au passage, le compilateur nous 
a signalé que EMIT existe déjà, 
mais nous savons que, selon que 
nous serons sous PRINTER ou 
sous FORTH, EMIT aura un sens 
différent. 

Pour créer nos nouveaux mots, 
nous utiliserons : (deux points) 
qui, comme CREATE, crée une 
entrée au dictionnaire mais 
compile à sa suite les CFA (Code 
Field Adress : adresse de champ- 
code) des mots FORTH de la défi¬ 
nition jusqu'au ; (point-virgule) 
qui termine et valide le mot créé. 
Ces définitions sont contenues 
dans l'écran ci-après que vous 
entrerez par EDITOR et que vous 
compilerez en bloc par 1 LOAD. 
Examinons un peu ces nouveaux 
mots que nous continuons à 
appeler comme des synonymes 
de FORTH (ceci n'a rien d'obliga¬ 
toire bien sûr) car leurs fonctions 
sont équivalentes en terme 
imprimante-vidéo. 

Rappelons que ce qui est entre 
parenthèses sert de remarques et 
ne sera pas compilé. 

Après être passé en décimal, 
nous créons facilement avec 


EMIT CR et SPACE qui effectuent 
un retour chariot et un espace. 
SPACES prend n sur la pile (on 
exprime cela par n—) et écrit n 
espaces. 

Pour ce faire, dupliquons n par 
DUP, vérifions que n n'est pas 
inférieure à 1 : si oui, nous lais¬ 
sons tomber n par DROP et ne 
faisons rien, si non faisons une 
boucle DO ... LOOP effectuant n 
fois SPACE. 

TYPE (Ad n—) envoie à l'impri¬ 
mante n octets à partir de 
l'adresse Ad. Nous passons 
ensuite à l'écriture des noir^bres 
dans la base courante : 

D.R (D-point-R) (d n —) écrit le 
nombre double d justifié à droite 
à la position n. 

D. iD-point) (d —) écrit le nom¬ 
bre double d. 

. (point) (n ™) écrit le nombre 
simple longueur n. 

.R (point-R) (ni n2 —) écrit le 
nombre simple longueur n1 jus¬ 
tifié à droite à la position n2. 
Pour écrire du texte, nous 
recréons ." (point-guillemet) qui 
utilise les guillemets comme 
séparateur. Il nous faut d'abord 
une primitive (.") puis donnons à 
deux significations selon que 
le mot est utilisé en mode immé¬ 
diat (STATE = 0) ou en mode 
compilation (STATE <>0). Evi¬ 


demment, c'est un peu compli¬ 
qué, et nous utilisons des mots tels 
que COUNT R> >R COMPILE 
WORD HERE ALLOT que nous 
reverrons et qui, rassurez-vous, 
sont élémentaires à comprendre. 
Nous définissons enfin LIST (n —) 
qui liste l'écran n utilisant 16 fois 
LINE (n —) laquelle liste la ligne 
n dont l'adresse est donnée par 
la primitive (LINE). Vous suivez ? 
Nous pouvons tester tous nos 
nouveaux mots en exécutant le 
plus élaboré par : 

PRINT 1 LIST 

Nous obtenons le listing d'écran 
que nous venons de copier. 

En un seul écran, nous avons 
défini 14 nouveaux mots qui don¬ 
nent à notre imprimante toute la 
souplesse du FORTH. Le mois 
prochain nous ajouterons à PRIN¬ 
TER des fonctions spécifiques à 
l'imprimante avec une copie 
rapide de l'écran MIRES. 

Pour les lecteurs qui ne possè¬ 
dent pas d'imprimante, essayez 
cet exercice : remplacez PRINTER 
par FRANÇAIS, utilisez le EMIT 
d'origine et définissez ESPACE , 
BLANCS , ENVOI , ECRIT , ect. 
Et voilà comment on se fabrique 
un FORTH bien de chez nous I 


SCRN# 1 

< 0> < Vocabulaire PRINTTER gestion d’irrprimante pour ATMC6 ) 

( 1> FORTH [£FINITIC1NS VOCABULARY PRINTER Ift€DIATE 

< 2) PRINTER DEFINITIONS iCX 

( 3) CREATE EMIT B586 , B5 . C120 . A6F5 . 4C85 . 5EE , SMUDGE 

< 4) DECIMAL ; CR 13 EMIT 10 EMIT ; ; SPACE 32 EMIT ; 

( 5) : SPACES DUP 1 < IF DROP ELSE 0 DO SPACE LOOP TFOJ ; 

< 6> : TYPE 0 DO DUP C@ EMIT 1+ LOOP DROP ; 

(7) < Inpression des norrbres et listing d’écran ) 

< 8) : D.R >R SWAP O'ÆR DABS <# IIS SIGN #> R> OVER - SPACES TYPE ; 

< 9> : D. 0 D.R SPACE ; : . S->D D. ; ; .R >R S->D R> D.R ; 

<10> : (.*) R COUNT DUP 1+ R> + >R TYPE ; 

(11) : .' 34 STATE @ IF COMPILE <.*> WORD h€RE C@ 1+ ALLOT 

(12> ELSE WORD PERE COUNT TYPE T>€N ; Iht€DIATE 

(13) ; LINE CR .* <* DUP 2 .R .' > "SCR 0 (LINE) TYPE ; 

(14) : LIST CR DUP SCR ! ." SCRN# " . 16 0 DO I LINE LOOP CR CR ; 

(15) FORTH CR ." PRINTER en place * :S 
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L'ORIC ET LES SPRITES 


Pierre NOIRMAIN 


U ne façon de procéder pour 
animer l'écran de l'ORIC 
consiste à redéfinir certains cri¬ 
tères, puis en introduisant, par 
POKE, un code de caractères 
dans une adresse écran spécifi¬ 
que. Cela a pour effet de placer 
un caractère donné directement 
sur l'écran à l'endroit désiré. Mais 
faire de l'animation en utilisant 
cette méthode demande beau¬ 
coup de travail, puisqu'il faut 
créer les ot^ts à partir de symbo¬ 
les graphiques définis. Par ail¬ 
leurs, le déplacement de l'objet 
d'un point à un autre exige un 
grand nombre de lignes de pro¬ 
gramme. Enfin, à cause des limi¬ 
tations imposées par les caractè¬ 
res redéfinis, la forme et la réso¬ 
lution de l'objet ne sont pas d'une 
qualité suffisante pour certaines 
applications. L'utilisation des 
sprites dans des séquences ani¬ 
mées élimine en grande partie ces 
problèmes. 

Un sprite est un objet en haute 
résolution ayant une forme quel¬ 
conque et étant programmable 
avec des commandes Basic. Il 
peut être déplacé très facilement 
sur l'écran. Il suffit de donner la 
position où on veut l'amener ; il 
peut aussi être agrandi (jusqu'à 
9 fois). 

Les contraintes pour réaliser cela 
sont minimales. Nous utiliserons 
la RAM pour stocker les informa¬ 
tions définissant les sprites. 
Donc, lançonsrnous dans leur 
création. Un sprite est un objet de 
24 points de large sur 21 points 
de haut. On peut contrôler 
jusqu'à un maximum de 8 spri¬ 
tes. Supposons que vous vouliez 
créer un ballon qui se déplace 
dans le ciel. Avant tout, charger 
le programme de saisie. Le pas 
suivant consiste à transformer 
votre création graphique en don¬ 
nées utilisables par l'ordinateur. 
Prenez une feuille quadrillée et 
dessinez une grille de 21 cases 
verticales sur 24 horizontales. 


A présent, remplissez la grille 
avec une création personnelle ou 
utilisez le ballon de la figure 1. 
Maintenant, prenez les cases que 
vous avez décidé être des cases 
pleines et noircissez-les. 

Votre dessin terminé, il s'agit 
maintenant de remplir la grille de 
l'écran. Les cases pleines corres¬ 
pondant à votre dessin doivent 
être remplies par un point, les 
cases vides par un espace. 
CALL #9601 permet d'entrer 
dans le programme de saisie. 
Touche = case noircie. 
Touche "espace" = case blan¬ 
che (représentée par un damier). 
En cas d'erreur, appuyez sur DEL 
pour revenir en arrière, ce qui affi¬ 
chera un 

Notez bien que tous les sprites 
doivent être saisis avant d'être 


utilisés. 

Si vous avez moins de 8 sprites 
à définir, frappez "F" lorsque l'or¬ 
dinateur passe à la définition d'un 
nouvel objet. 

Revenons à notre ballon. 
Exécutez le programme-test qui 
suit et observez le résultat. 

Si vous avez tout tapé correcte¬ 
ment, votre ballon doit être en 
train de voler paisiblement à tra¬ 
vers les deux. 

Tout cela est d'un bel effet sur 
l'écran, n'est-ce pas ? Il est 
important de remarquer que la 
matrice du sprite à pour origine 
son coin supérieur gauche. 
Quand on l'agrandit, cette origine 
reste inchangée, et ne se déplace 
pas avec l'agrandissement. 
Alors, bon amusement avec vos 
sprites I 


EXEMPLE DE SPRITE REPRESENTANT UN BALLON 

Les correspondant à des ATTENTION I Avant d'utiliser la 
cases noircies. Les cases vides gestion de sprites contrôle du 
correspondant à des blanches. Basic, faire HIMEM # 90FF. 



Exempt 1 

: de 

jprite representdnl 

un ballon 






- 










l 










« 

« 

» 

* 

« 

« 

« 










2 








« 

* 

* 

» 

* 

* 

* 

* 

* 

* 

« 








3 







* 

* 

* 

« 

* 

* 

* 

» 

* 

* 

* 

* 

* 







4 







* 

* 

« 

« 

» 




* 

» 

* 

* 

« 







5 






« 

«- 

« 

* 

* 


* 

«■ 

« 


« 

« 

« 

* 

* 






6 






* 

* 

* 

* 

« 


» 

* 

* 


« 

* 

* 

♦ 

» 






7 






* 

* 

* 

« 

* 


* 

* 

* 


* 

* 

* 

* 

4 






8 







* 

« 

* 

« 

* 




* 

* 

* 

* 

* 







9 







* 

« 

« 

» 

« 

* 

* 

* 

« 

* 

•» 

« 

* 







10 







* 

* 

* 

« 

* 

* 

» 

« 

* 

* 

« 

« 

* 







11 







» 


* 

* 

«■ 

«- 

* 

* 

* 

« 

« 


« 







12 








* 


« 

* 

* 

* 

* 

* 

* 


* 








1 1 








* 

h 


* 

* 

* 

« 

* 



4- 








14 









« 



* 

« 

* 



* 









IS 









* 



« 

« 

* 



* 









lé> 










* 



« 













1.' 










* 



* 



* 










18 











* 

* 

* 

« 

♦ 











17 











♦ 

« 

* 

» 

* 











20 











« 

« 

* 

» 

« 











21 












« 

* 

* 













PROGRAMME DE TEST 



10 PHPEk 

2 

: MIRES ; 

PftPER3 


ir4V4 


r-175 




20 FOR 

X 

• 

10 

TO 175 

STEP 

5 










30 

SPRITEd, 

X,Y. l) 

WflIT 100 


■DELSPPITEll) 

. > 

r-Y 

-5 ; 

NEXÎ 
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Voici la syntaxe du mini¬ 
interpréteur graphique permet¬ 
tant la gestion des sprites. 

La fonction I est initialisée par le 
sous-programme de saisie des 
sprites. Si on ne passe pas par 
cette étape, il faut faire DOKE 
#2F5, #9371. 

Pat Is ci lîtA * 

• ! SPRITE (N,X,Y,F) affiche le 
sprite N (1 à 8) aux coordonnées 
X et Y. Il sera agrandi d'un fac¬ 
teur F variant de 1 à 9. 

Ex.: I SPRITE (1,100,80,2) affi¬ 
che au centre de l'écran le sprite 
1 agrandi deux fois. 

• ! DELSPRITE (N) fonctionne en 
"bascule". Efface le sprite N ou, 
s'il était effacé, le fait réapparaî¬ 
tre. 

• I MAGNIFY (N) agrandit le 
sprite N. 

• ! REDUCE (N) réduit le sprite N. 

• I LOCATE (N,A,B) transfère 
immédiatement le sprite N aux 
nouvelles coordonnées A et B. 

• ! PAINT (N,C) avec C variant de 
0 à 7, colore le sprite N de la cou¬ 
leur C. Attention I affecte les 
"objets" situés à droite du sprite. 

• ! ON SPRITE (N) GOSUB xx 
exécute le sous-programme 


débutant à la ligne xx si le sprite 
N est affiché. Le sous- 
programme doit se terminer par 
RETURN. 

MODIFICATIONS 
POUR ATMOS 

L'auteur a développé son pro¬ 
gramme sur ORIC-1. Plusieurs 
routines de la ROM étant utili¬ 
sées, il faut les remplacer par 
leurs équivalents en ATMOS. 
Voici, à cet effet, les correspon¬ 
dances ORIC 1 — ATMOS. 

ORIC 1 ATMOS 


CFE4 

D070 

D80A 

D8C5 

CFD3 

D05F 

EFA6 

F049 

F23A 

F2CD 

C996 

C9C8 

CA61 

CA99 

C8AD 

C8C1 

EFE6 

F089 

D2A0 

D336 

F17F 

F204 

F18B 

F210 

CCOA 

CCCE 

C5F8 

C5E8 

EFF5 

F095 


Série de DOKE à effectuer pour 
transformer le programme 
ORIC 1 en ATMOS. 

PROGRAMME AFFICHAGE 

DOKE #93ED, #D070 
DOKE #93F8, #D8C5 
DOKE #9403, #D05F 
DOKE #9418, #F049 
DOKE #942F, #F2CD 
DOKE #943E, #C9C8 
DOKE #9441, #CA99 
DOKE #9444, #C8C1 
DOKE #9492, #F049 


PROGRAMME SAISIE 

DOKE #9614, #F204 
DOKE #961C, #F210 
DOKE #962B, #CCCE 
DOKE #963B, #F089 
DOKE #9662, #C5E8 
DOKE #9686, #F089 
DOKE #96DA, #F089 
DOKE #96F9, #F095 


Avant d'utiliser les sprites, il faut 
bien entendu avoir chargé la zone 
mémoire correspondante (début 
en #9100). 


VERSION ORIC-1 

10 FORN=#937 


AO 
OA 
73 
86 
08 
06 
95 
F3 
E9 
DC 
06 
4 G 
93 
A9 
A5 
OC 
85 
OB 
C8 
DO 
IC 
F7 


30 : 


40 : 


i OiO 

DATA 

1020 

DATA 

1030 

DATA 

1040 

DATA 

1 0^0 

DATA 

1060 

DATA 

1070 

DATA 

1080 

DATA 

1090 

DATA 

1100 

DATA 

1 1 10 

DATA 

1120 

DATA 

1 130 

DATA 

1140 

DATA 

1 150 

DATA 

1160 

DATA 

1 170 

DATA 

1180 

DATA 

1 190 

DATA 

1200 

DATA 

1210 

DATA 

1220 

DATA 


1T0#9545 : READI * : I=VAL( "«‘■ + 1 $ ) ; POKEN , I : NEXT 
1T0#9715IREADI$ :I=VAL<"#" + I $);POKEN,I :NEXT 


,F3,8C; 
,46,0E; 
,D0,40; 
,0E,C9. 
,A9,09, 
,A9,06; 
,F0,03; 
, C6,OE; 
,06,BC: 
,FB,C8, 
,20,E2, 
.7E,94, 
,BC,10 : 
,01,9D: 
,F6,9D, 
,BD,30] 
,0F,AO, 
,06,OA : 
,B1,10, 
, C8,A5, 
,C6,OD, 
, 86,F5, 


FD,93, 
A9,03, 
C9,4C, 
52,DO, 
A2,2D, 
A2,36, 
4C,E4, 
DO,F5, 

10.93, 
8C,01, 
00,4C, 
BD,50, 
93,4C, 

50.93, 
00,93, 
93,BC, 
00,A2, 
08,90, 
28,CA, 
10,18, 
D0,A8, 
A2,40. 


A2,F6 
A2,3C 
D0,0D 
0B,A9 
AO, 50 
AO, 68 
CF,C8 
20,D3 
AA, 20 
02,8D 
96,C9 
93,49 
8E,94 
A5,F4 
AA, 84 
40,93 
01,86 
02,45 
D0,E8 
69,28 
AD,BA 
20,08 


,8E,6D 
,A0,08 
,C6,0E 
,06,A2 
,D0,12 
,85,00 
,20,E2 
,CF,4C 
,A6,EF 
, 00,02 
,20,61 
,01,9D 
,20,58 
,95,00 
, 00,20 
,8C,BB 
,09,BD 
,0F,46 
,C6,0E 
,85,10 
,94,69 
,94,60 


,94,A2 
,D0,4C 
,A9,06 
,27,AO 
,C9,B4 
,8E,E8 
,00,C4 
,50,94 
,A6,F5 
,4C,3A 
,CA,4C 
,50,93 
,94,A6 
,A9,05 
,A6,EF 
,94,8D 
,3C,91 
,0F,90 
,D0,E0 
,90,02 
,03,90 
,4C,A0 


,01,A0 
,C9,53 
,A2,21 
,D6,8C 
,D0,08 
,93,8C 
,00,DO 
,8E,02 
,B5,00 
,F2,C9 
,AD,C8 
,86,F7 
,F7,F6 
,8D,CB 
,A6,F7 
,BA,94 
,85,OA 
,0B,09 
,09,40 
,E6,11 
,03,EE 
,D2,4C 


,04,84 
,D0,08 
,A0,46 
,6D,94 
,A9,07 
,06,94 
,F0,20 
,02,A6 
,A8,18 
,9B,D0 
,A6,F7 
,A9,45 
,00,A9 
,94,A5 
,B5,00 
,A6,0B 
,A2,0’8 
,40,91 
,91,10 
,E6,00 
,BB,94 
,4F,43 


,0E,48,C9 
,A9,06,A2 
,EE,FD,93 
,D0,1C,C9 
,A2,3F,A0 
,68,AO,00 
,0A,D8,A4 
,F5,BD,00 
,A9,00,69 
,B7,BD,50 
,20,5A,94 
,8D,CB,94 
,05,D0,E9 
,F5,9D,10 
,85,0B,A9 
,86,OD,AD 
,86,0E,B1 
,10,A9,20 
,A6,09,E8 
,A6,00,EO 
, C6 , OC , DO 
,41,54,45 


,50,DO 
,30,AO 
,D0,2F 
,44,DO 
,31,D0 
,D9,2D 
,0E,96 
,93,38 
,15,88 
,93,F0 
,A6,F7 
,BD,00 
,A6,F7 
,93,A8 
,15,85 
,15,02 
,10,A6 
,85,0F 
,E0,04 
,C8,BO 
,93,A6 
,52,45 


21 




1230 

DATA 

1240 

data 

2010 

DATA 

2020 

DATA 

2030 

DATA 

2040 

DATA 

2050 

DATA 

2060 

DATA 

2070 

DATA 

2080 

DATA 

2090 

DATA 

2100 

DATA 

21 10 

DATA 

2120 

DATA 

2130 

DATA 

2140 

DATA 


44,55,43,45,44,45,4C,53,50,52,49,54,45,4D,41,47,4E,99,59,50 
41,07,64,53,50,52,49,54,45 

A2,08,A9,00,90,50,93,CA,DO,FA,CE,6A,02,A9,04,80,El ,02,20,7F 
Fl,A9,01,80,E1,02,20,8B,F1,A2,00,A0,91,86,05,84,06,A9,01,85 
04,20,0A,CC,A2,28,A0,BC,86,10,84,11,20,OC,96,A2,15,20,E6,EF 
A9,7F,A0,00,91,10,A0,19,91,10,CA,O0,F0,2O,BF,96,A2,50,A0,BC 
86,10,84,11,A0,00,84,01,84,02,A2,08,A9,7E,35,03,20,F8,C5,C9 
7F,00,03,4C,Fl,96,C9,46,FO,42,06,00,C9,2E,00,04,E6,00,E6,03 
E6,01 ,A4,01 ,A5,03,91 ,‘lO,CO, 18,D0,07,20,E6,EF,A0,00,84,01 ,CA 
00,CE,E6,02,A5,00,A4,02,91,05,C0,3F,O0,C0,13,A5,05,69,3F,85 
05,90,02,E6,06,E6,04,A6,04,EO,09,FO,03,4C,2A,96,A2,71,A0,93 
8E,F5,02,8C,F6,02,EE,6A,02,60,A6,04,A5,05,90,30,93,A5,06,9D 
40,93,EE,F0,96,A2,0B,BO,E5,96,9O,OE,BB,CA,D0,F7,20,E6,EF,A0 
1A,A9,7F,88,91,10,00,FB,60,53,70,72,69,74,65,20,4E,6F,20,30 
A4,01,00,07,AO,18,34,01,20,F5,EF,A9,2A,9l,10,C6,01,E0,08,D0 
0A,C6,02,A4,02,B1,05,85,00,A2,00,E8,46,00,40,50,96 


PETIT TEST 

1 HIMEM#8FFF 
5 00KE#2F5,#9371 
10 HIRES;FORI=1T060 

20 X=RNO(1>*150+10 :Y=RNO(1)*150+10 

30 ! SPRITE( 1 ,X,y, 1) : IPAINTd ,RNO( 1 )*6+l ) 

40 WAITIOO:!OELSPRITE(1):NEXT 


SAISIE 


9601 

A2 

08 


LDX 

#f08 

Spritet 1 A 8 non oflichét 

9655 

AO 

00 


LDY 

#$00 

Initîaliaa rximbra da pointa par ligr>a 

9603 

A9 

00 


LDA 

#too 

Etat • 0 

9657 

84 

01 


STY 

$01 


9605 

9D 

50 

93* 

STA 

*9350,X 


9659 

84 

02 


STY 

$02 

Initialtae nombra d'octata par l$or>a 

9608 

CA 



DEX 



965B 

A2 

08 


LDX 

#$08 

Nombra de pointa par octat 

9609 

DO 

FA 


BNE 

$9605 


965D 

A9 

7E 


LDA 

#$7E 


960B 

CE 

6A 

02 

DEC 

$026A 

Supprasaion curaaur 

965F 

85 

03 


STA 

$03 

A«CHR»(126I 

960E 

A9 

04 


LDA 

«$04 


9661 

20 

F8 

C5 

JSR 

$C5F8 

Sataie dea pointa 

9610 

8D 

El 

02 

STA 

$02E1 


9664 

C9 

7F 


CMP 

#i7F 

Compara à "DEL** 

9613 

20 

7F 

Fl 

J SR 

$F17F 

PAPER 4 

9666 

DO 

03 


BNE 

$966B 


9616 

A9 

01 


LDA 

#$01 


9668 

4C 

Fl 

96 

J MP 

$96F1 


9618 

8D 

El 

02 

STA 

$02E1 


966B 

C9 

46 


CMP 

#$46 

Si "F", fin da aaiaia 

961B 

20 

8B 

Fl 

JSR 

$F18B 

INK 1 

966D 

FO 

42 


BEQ 

$96B1 


961E 

A2 

00 


LDX 

#$00 


966F 

06 

00 


ASL 

$00 


9620 

AO 

91 


LDY 

#$91 


9671 

C9 

2E 


CMP 

#$2E 

Si 

9622 

86 

05 


STX 

$05 

Adraaaa de dAbut de atoc- 

9673 

DO 

04 


BNE 

$9679 


9624 

84 

06 


STY 

$06 

kage des apritas 

9675 

E6 

00 


INC 

$00 

Point mia A 1 

9626 

A9 

01 


LDA 

#$01 


9677 

E6 

03 


INC 

$03 

A - CHRI(127> 

9628 

85 

04 


STA 

$04 

Nombra de apritaa 

9679 

E6 

01 


INC 

$01 


962A 

20 

OA 

CC 

JSR 

$CCOA 

eus 

967B 

A4 

01 


LDY 

$01 


962D 

A2 

28 


LDX 

#$28 


967D 

A5 

03 


LDA 

$03 


962F 

AO 

BC 


LDY 

#$BC 


967F 

91 

10 


STA 

($10),Y 

Affichage du point aaiai 

9631 

86 

10 


STX 

$ 10 


9681 

CO 

18 


CPY 

#$18 


9633 

84 

11 


STY 

$11 


9683 

DO 

07 


BNE 

$968C 


9635 

20 

DC 

96 

JSR 

$96DC 

Afficha la cadra 

9685 

20 

E6 

EF 

JSR 

$EFE6 

Paaae A la ligr>a auivanta 

9638 

A2 

15 


LDX 

#$15 


9688 

AO 

00 


LDY 

#$00 


963A 

20 

E6 

EF 

JSR 

$EFE6 


968A 

84 

01 


STY 

$01 


963D 

A9 

7F 


LDA 

#$7F 


968C 

CA 



DEX 



963F 

AO 

00 


LDY 

#$00 


968D 

DO 

CE 


BNE 

$965D 


9641 

91 

10 


STA 

($10),Y 


Ç68F 

£6 

02 


INC 

$02 

Irtcrémanta n^ octat 

9643 

AO 

19 


LDY 

#$19 


9691 

A5 

00 


LDA 

$00 


9645 

91 

10 


STA 

($10) ,Y 


9693 

A4 

02 


LDY 

$02 


9647 

CA 



DEX 



9695 

91 

05 


STA 

< $05),Y 

Stocka octat aaiaia {3 par ligrvaa) 

9648 

DO 

FO 


BNE 

$963A 


9697 

CO 

3F 


CPY 

#$3F 


964A 

20 

BF 

96 

JSR 

$96BF 


9699 

DO 

CO 


BNE 

$965B 


964D 

A2 

50 


LDX 

#$50 


969B 

18 



CLC 


Sprita avivant 

964F 

AO 

BC 


LDY 

#$BC 

Adraaaa début affichaga 

969C 

A5 

05 


LDA 

$05 


9651 

86 

10 


STX 

$ 10 


969E 

69 

3F 


ADC 

#$3F 


9653 

84 

11 


STY 

$11 


96A0 

85 

05 


STA 

$05 



22 






96A2 

90 

02 


BCC 

t96A6 


960E 

A9 

7F 


LOA 

#«7F 


96A4 

E6 

06 


INC 

«06 

A0r«Mé définition du 

96E0 

88 



OEY 



96A6 

E6 

04 


INC 

«04 

■prito tuivont 

96E1 

91 

10 


STA 

(«10>.Y 


96A8 

A6 

04 


LOX 

(04 


96E3 

OO 

FB 


BNE 

«96E0 


96AA 

EO 

09 


CPX 

#«09 

8 maiu 

96E5 

60 



RTS 



96AC 

FO 

03 

96 

8EQ 

«9681 


96E6 

: 53 70 72 

69 74 65 20 4E 

Sprtt* N 

96AE 

9681 

4C 

A2 

2A 

71 

JMP 

LOX 

«962A 

#«71 

InitioliM routino d'offi* 

96EE 

: 6F 20 30 



O 0 

9683 

AO 

93 


LOY 

#«93 

choo« é «9371 

96F1 

A4 

01 


LOY 

«01 

Empiafwtnt du point tu# 

968S 

8E 

FS 

02 

STX 

«02F5 


96F3 

00 

07 


BNE 

«96FC 

ta ligne 

9688 

8C 

F6 

02 

STY 

«02F6 


96F5 

AO 

18 


LOY 

#«18 


9688 

EE 

6A 

02 

INC 

«026A 

Wéoppontion cur—ur 

96F7 

84 

01 


STY 

(01 


968E 

60 



RTS 



96F9 

20 

FS 

EF 

JSR 

«EFF5 

Ligne précédente 

968F 

A6 

04 


LOX 

«04 


96FC 

A9 

2A 


LOA 

#«2A 


96C1 

A5 

OS 


LOA 

«OS 


96FE 

91 

10 


STA 

((10).Y 

Affiche 

96C3 

90 

30 

93 

STA 

«9330.x 

Octot fodAo début défn- 

9700 

C6 

01 


OEC 

«01 


96C6 

AS 

06 


LOA 

«06 

tion 

9702 

EO 

08 


CPX 

#«08 

Si X * 8, octet dé(é etocké 

96C8 

90 

40 

93 

STA 

«9340.X 

Oeiot fon début défwvtion 

9704 

OO 

OA 


BNE 

«9710 


96C8 

EE 

FO 

96 

INC 

«96F0 


9706 

C6 

02 


OEC 

«02 

Décrémente n* octet 

96CE 

A2 

08 


LOX 

#«0B 


9708 

A4 

02 


LOY 

«02 


96D0 

80 

ES 

96 

LOA 

«96ES.X 


970A 

81 

OS 


LOA 

1 (OS),Y 


9603 

90 

OE 

88 

STA 

«BBDE.X 

Atftcbo "Spmo No" 

970C 

83 

00 


STA 

«00 

Octet précédent dene KX)I 

9606 

CA 



OEX 



970E 

A2 

00 


LOX 

#«00 


9607 

00 

F7 


BNE 

«9600 


9710 

E8 



INX 


1 bit de ♦ é 

9609 

20 

E6 

EF 

JSR 

«EFE6 


9711 

46 

00 


LSR 

«00 

Rotebon octet en coure de 

960C 

AO 

lA 


LOY 

»«1A 

Affichopo du codfo 

9713 

4C 

SO 

96 

JMP 

«96SD 

eettie. 


AFRCHAGE DES SPRITES 

Affichage : ISPRITE (N.X,Y,C) 
Effacement : IDELSPRITE (N) 
ou réapparition 

Agrandissement : IMAGNIFY (N) 
Réduction : IREDUCE (N) 


Transfert : ILOCATE (N,A,B) 
Attribut : IPAINT (N,C) 
Exécution routine : I ON SPRITE 
(N) GOSUB XX 
Si Sprite affiché. 

Où N est le numéro du sprite, 

X la coordonnée X, 


Y la coordonnée Y, 

F le facteur d'agrandissement (de 
1 à 9) 

A et B les coordonnées de trans¬ 
fert, 

C l'attribut (de 0 à 7 pour la cou¬ 
leur, 14 = clignotement). 


0.10 9371 

LDY ttF3 

RO F3 

Met F3 en F4FD 

0,20 

STY 93FD 

8C FD 93 


1,00 

LDX «F6 

R2 F6 

Met "INC" en 946D 

2, 00 

STX 946D 

8E 6D 94 

(pour MAGNIFY) 

10,00 

LDX ttOl 

R2 01 


40,00 

LDY «04 

RO 04 

Nombre de paramétres 

50,00 

STY OE 

84 OE 

é saisir 

60,00 

PHR 

48 

Sauvegarde 1" car. 

61,00 

CMP "P" 

C9 50 

après "1" 

62,00 

BNE +10 

DO OR 


63, 00 

LSR OE 

46 OE 

2 paramétres pour PAINT 

64,00 

LDR «03 

R9 03 

PAINT : 3 car. : "INT ' 

65, 00 

LDX «3C 

R2 3C 

mot-cM 

66, 00 

LDY «08 

RO 08 


67,00 

BNE +76 

DO 4C 

Va an 930C 

70, 00 

CMP "S" 

C9 53 


80,00 

BNE +8 

DO 08 


?0,00 

LDR «06 

R9 06 

6 car. pour SPRITE 

100,00 

LDX «30 

R2 30 


110,00 

LDY «73 

RO 73 


r20,oo 

BNE +64 

DO 40 

Va en 930C 

121,00 

CMP "L" 

C9 4C 


l'22,00 

BNE +13 

DO OD 


l'23,00 

DEC OE 

C6 OE 

3 param. pour LOCATE 

124,00 

LDR «06 

R9 06 

6 car. pour LOCATE 

l'25,00 

LDX «21 

R2 21 


126, 00 

LDY «46 

RO 46 


127,00 

INC 93FD 

EE FD 93 

Met F4 en 93FD 


23 





128, 

00 


BNE 

+ 47 

DO 

2F 


Va en 930C 

130, 

00 


3TX 

OE 

84 

OE 



131, 

00 


CMP 

Il pi II 

C7 

52 



132, 

00 


BNE 

+ 11 

DO 

OB 


, 

133, 

00 


LDfl 

#04 

R7 

04 


6 car. pour REDUCE 

134, 

00 


LDX 

#27 

R2 

27 



135, 

00 


LDY 

#D4 

RO 

D4 


Met "DEC" en 946D 

134, 

00 


3TY 

744D 

8C 

4D 

74 

pour REDUCE 

137, 

00 


BNE 

+28 

DO 

IC 


Va en 93DA 

140, 

00 


CMP 

"D" 

C7 

44 



ISO, 

00 


BNE 

+8 

DO 

08 



140, 

00 


LDR 

#07 

R7 

07 


9 car. pour DELSPRITE 

170, 

00 


LDX 

#2D 

R2 

2D 



130, 

00 


LDY 

#50 

RO 

50 



1?0, 

00 


BNE 

+ 18 

DO 

12 


Va en 93DC 

1?1, 

00 


CMP 

"ON" 

C7 

B4 



1?2, 

00 


BNE 

+8 

DO 

08 



173, 

00 


LDft 

#07 

R7 

07 


7 caract. "ON" : MOT- 

174, 

00 


LDX 

#3F 

R2 

3F 


CLE 

175, 

00 


LDY 

#31 

RO 

31 



174, 

00 


BNE 


DO 

04 



200, 

00 


LDFi 

#04 

R7 

04 


6 car. "IF" : MOT-CLE 

210, 

00 


LDX 

#34 

R2 

34 



220 ’ 

00 

93DA 

LDY 

#48 

RO 




230, 

00 

93DC 

STR 

00 

85 

00 


Longueur nom fonction 

240, 

00 


3TX 

73E8 

8E 

E8 

73 

Début nom (octet faible) 

250, 

00 


3TY 

7404 

8C 

04 

74 

Traitement (octet faible) 

240, 

00 


PLR 


48 



Vérification syntaxe 

270, 

00 


LDY 

#00 

RO 

00 



280, 

00 


CMP 

7500,Y 

D7 

00 

75 


270, 

00 


BEQ 

+3 

FO 

03 



300, 

00 


JMP 

CFE4 

4C 

E4 

CF 

Syntax error 1 

310, 

00 


INY 


C8 




320, 

00 


J3P. 

00E2 

20 

E2 

00 

CHARGET 

330, 

00 


CPY 

00 

C4 

00 



340, 

00 


BNE 

-14 

DO 

FO 



350, 

00 


J3R; 

D80R 

20 

OR 

D8 

Recueil des paramètres 

340, 

00 


LDY 

OE 

R4 

OE 


N° d'ordre du par. 

370, 

00 

93FC 

3TX 

F3, Y 

74 

F3 


Param. de F4 à F7 

380, 

00 


DEC 

OE 

C4 

OE 



370, 

00 


BNE 

-11 

DO 

F5 



400, 

00 


J3R 

CFD3 

20 

D3 

CF 

Vérifie ")" 

410, 

00 


JMP 

7400 

4C 

00 

74 

Saut routine traitement 

410, 

10 

9408 

3TX 

0202 

8E 

02 

02 

ATTRIBUT 

410, 

20 


LDX 

F5 

R4 

F5 


N® du Sprite 

410, 

30 


LDR 

7300,X 

BD 

00 

73 

COORD. X 

410, 

40 


3EC 


38 



SOUSTRAIT 6 POUR 

411, 

00 


3BC 

#04 

E7 

04 


DECREMENTER 

412, 

00 


LDY 

7310,X 

BC 

10 

73 

ADRESSE ECRAN 

413, 

00 


TRX 


RR 



COORD. Y 

414, 

00 


J3P. 

EFR4 

20 

R4 

EF 

ADRESSE DEBUT FILL 

415, 

00 


LDX 

F5 

R4 

F5 



414, 

00 


LDR 

00, X 

B5 

00 


FACTEUR D’AGRAND 

420, 

00 


TRY 


R8 



du sprite X 

430, 

00 


CLC 


18 



DETERMINE HAUTEUR 

440, 

00 


LDR 

#00 

R7 

00 


DU SPRITE 

450, 

00 


RDC 

#15 

47 

15 



440, 

00 


DEY 


88 




470, 

00 


BNE 

-5 

DO 

FB 



480, 

00 


INY 


C8 





24 





4?0,00 


3TY 

0201 

8C 

01 

02 

NBRE COL. = 1 

500.00 


STR 

0200 

8D 

00 

02 

NBRE LIGNES 

510,00 


JMP 

F23R 

4C 

3R 

F2 

FILL 

520,00 


CMP 

#7B 

C7 

7B 


GOSUB 7 

521,00 


BNE 

-73 

DO 

B7 


SYNTAX ERREUR 1 

522,00 


LDR 

#7350,X 

BD 

50 

73 


523,00 


ElEQ 

+6 

FO 

06 


SPRITE NON AFFICHE 

524,00 


JSP. 

00E2 

20 

E2 

00 

Pointe 1*' car. suivant GOSUB 

525,00 


JMP 

C776 

4C 

76 

C7 

GOSUB 

526,00 


J SR 

CR61 

20 

61 

CR 

POINTE FIN DE LIGNE 

527,00 


JMP 

C8RD 

4C. 

RD 

C8 

EXECUTE LIGNE SUI¬ 

561,00 


LDX 

P7 

R6 

F7 


VANTE 

562,00 


JSR 

745R 

20 

5R 

74 


563,00 


LDX 

F7 

R6 

F7 


Affiche aux nouvelles 

564,00 


JMP 

747E 

4C 

7E 

74 

coord. 

581,00 


LDR 

#7350,X 

BD 

50 

73 

ROUTINE IDELSPRITE 

582,00 


EOR 

#01 

47 

01 


INVERSE L'ETAT 

583,00 


STR 

#7350,X 

7D 

50 

73 

D'AFFICHAGE DU 

570,00 

• 

STX 

F7 

86 

F7 


SPRITE 

571,00 

945A 

LDR 

#45 

R7 

45 


"EOR" en 94CB pour 

600,00 


STR 

74CB 

8D 

CB 

74 

l'effacement 

610,00 


LDR 

7300,X 

BD 

00 

73 

Coordonnée X 

620,00 


LDY 

7310,X 

BC 

10 

73 

Coordonnée Y 

630,00 


JMP 

748E 

4C 

8E 

74 


640,00 


JSR 

7458 

20 

58 

74 

Efface avant agrand. ou 

650,00 


LDX 

F7 

R6 

F7 


réduct. 

660,00 


INC 

00, X 

F6 

00 


Incr. ou décr. facteur d'agrandissement 

670,00 


LDR 

#05 

R7 

05 


"ORA" en 94CB pour l'affichage 

680,00 


BNE 

-23 

DO 

E7 



710,00 


LDX 

F7 

R6 

F7 



711,00 


LDR 

#01 

R7 

01 



712,00 


STR 

7350,X 

7D 

50 

73 

SPRITE AFFICHE : Etat-A 

720,00 


LDR 

F4 

R5 

F4 


Facteur d'agrandisse¬ 

730,00 


STR 

00, X 

75 

00 


ment du SPRITE X 

731,00 

947E 

LDR 

#05 

R7 

05 


"ORA" en 94CB 

732,00 


STR 

74CB 

8D 

CB 

74 


740,00 


LDR 

F5 

R5 

F5 



750,00 


STR 

7310,X 

7D 

10 

73 

Sauvegarde Y 

760,00 


TRY 


R8 



770,00 


LDR 

F6 

R5 

F6 



780,00 


STR 

7300.x 

7D 

00 

73 

Sauvegarde X 

770,00 


TRX 


RR 




771,00 


STY 

00 

84 

00 


Sauvegarde coordonnée Y 

800,00 


JSR 

EFR6 

20 

R6 

EF 

Calcul adresse début affichage 

810,00 


LDX 

F7 

R6 

F7 


820,00 


LDR 

00, X 

B5 

00 



830,00 


STR 

OB 

85 

OB 



840,00 


LDR 

#15 

R7 

15 


21 lignes de définition 

850,00 


STR 

OC 

85 

OC 


860,00 


LDR 

7330.x 

BD 

30 

73 

'Sauvegarde en 1020 

870,00 


LDY 

7340.x 

BC 

40 

73 

l'adresse de début de 

740,00 


STY 

74BB . 

8C 

BB 

74 

définition du sprite X - 1 

750,00 


STR 

74BR 

8D 

BR 

74 


760,00 


LDX 

OB 

R6 

OB 


Facteur d'agrandisse¬ 

770,00 


STX 

OD 

86 

OD 


ment par ligne 

784,00 


LDR 

0215 

RD 

15 

02 

Val. dépendant de la 

770,00 


STR 

OF 

85 

OF 


position du 1" pixel Icf. 

771,00 


LDY 

#00 

RO 

00 


CURSET) 

1000,00 


LDX 

#01 

R2 

01 



1010,00 


STX 

07 

86 

07 


Compteur d'octets 
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1020,00 

LDA 9000,X 

BD 00 90 


1021,00 

STA OA 

85 OA 

Octet de la définition 

1030,00 

LDX #08 

A2 08 


1040,00 

STX OE 

86 OE 

8 points à tester par 

1041,00 

LDA (10),Y 

B1 10 

octet 

lO/oO, 00 

LDX OB 

A6 OB 

Facteur d'agrandisse- 

1070,00 

ROL OA 

26 OA 

nnent par colonne 

1090,00 

PHP 

08 

Sauvegarde C 

1100,00 

BCC +2 

90 02 

Teste si point è 1 

1U0,00 94CB 

ORA OF 

05 OF 


1180,00 

LSR OF 

46 OF 


1190,00 

BCC +11 

90 OB 


1190,10 

ORA #40 

09 40 

Force bit 7 é 1 avant 

1191,00 

STA (10), Y 

91 10 

affichage 

1200,00 

LDA #20 

A9 20 


1210,00 

STA OF 

85 OF 


1220,00 

INY 

C8 


1221,00 

LDA (10),Y 

B1 10 


1250,00 

PLP 

28 

Récupère C (valeur du 

1260,00 

DEX 

CA 

point) 

1270,00 

BNE -24 

DO E8 


1290,00 

DEC OE 

C6 OE 


1300,00 

BNE -32 

DO EO 


1300,10 

ORA #40 

09 40 

Force bit 7 é 1 avant 

1301,00 

STA (10),Y 

91 10 

affichage 

1310,00 

LDX 09 

A6 09 


1320,00 

INX 

E8 


1330,00 

CPX #04 

EO 04 

3 octets par ligne de 

1340,00 

BNE -56 

DO C8 

définition 

1350,00 

LDA 10 

A5 10 

Récupère AFFICHE 

1352,00 

CLC 

18 

début ligne 

1353,00 

ADC #28 

69 28 

Ajoute 40 

1354,00 

STA 10 

85 10 


1355,00 

BCC +2 

90 02 


1360,00 

INC 11 

E6 11 


1370,00 

INC 00 

E6 00 

Débordement écran 7 

1380,00 

LDX 00 

A6 00 


1390,00 

CPX #C8 

EO C8 


1400,00 

BCS +28 

BO IC 


1440,00 

DEC OD 

C6 OD 


1450,00 

BNE -88 

DO AS 


1460,00 

LDA 94BA 

AD BA 94 

Ligne de définition sui¬ 

1470,00 

RDC #03 

69 03 

vante 

1480,00 

BCC +3 

90 03 


1490,00 

INC*9488 

EE BB 94 


1500,00 

DEC OC 

C6 OC 


1510,00 

BNE -109 

DO 93 


1511,00 

LDX F7 

A6 F7 

Supprime l'attribut situé 

1512,00 

STX F5 

86 F5 

é gauche du sprite 

1513,00 

LDX #40 

A2 40 


1514,00 

JSR 9408 

20 08 94 


1520,00 

RTS 

60 


1530,00 

JMP D2A0 

4C AO D2 

Illégal quantity error 1 


1540,00 9521 "LDCRTE" 4C 

1550,00 9527 "REDUCE" 52 

15é>0,00 952D "DEL" 44 

1570,00 9530 "SPRITE" 53 

1580,00 9536 "MRGNIFY" 4D 

1590,00 953C "PAINT" 50 

lé.00,00 953F "ON SPRITE" B4 


4K 43 41 54 45 
45 44 55 43 45 
45 4C 

50 52 49 54 45 
41 47 4E 99 59 
41 D7 

53 50 52 49 54 45 
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ATOUT COEUR! 


PREMIERS PAS 


EM 



NOUVEAUX JEUX SUR ATMOS 

Czes Kosniowski 

Êtes-vous capable 
d échapper à une meute de loup ? 
de dresser un serpent ? 
de piloter un module lunaire ? 

Voici 30 programmes de /eux vanés jeux de pur divertis¬ 
sement qui utilisent le son et la couleur, puzzles, leux 
d'arcade, problèmes de reflexion, airs de musique popu¬ 
laire pnx 88 F 

JEUX GRAPHIQUES SUR ATMOS 

David Chane-Hune et François Darbois 
Découvrez dans ce livre 22 |eux plus fascinants les uns 
que les autres. Saurez-vous abattre l’avion ennemi qui 
vient d'entrer dans votre espace aérien, résister au champ 
de force qui essaye de vous happer, détruire les vagues 
successives d'envahisseurs... 

Les grandes possibilités graphiques et sonores de l'Atmos 
permettent de réaliser des effets très intéressants. 95 F. 


PREMIERS PAS EN 
PROGRAMMATION SUR ORIC 

Georges Viguier 

L'ouvrage des débutants»ui veulent s'initier à l'informati¬ 
que et aux techniques de la programmation. 

La méthode est originale et rationnelle. Elle guide le lec¬ 
teur “en douceur" vers la programmation en BASIC. 

Les exemples programmes sont très simples. 

Chapitre t : L'ordinateur ou “calculateur numérique" 
Chapitre 2 : L'analyse . 

Chapitre 3 : Introduction à la programmation 
Chapitre 4 : De la théone à la pratique 
Chapitre 5 : Du fonctionnel à la programmation ^ 

168 pages - Prix : 79 F 

Edimicro 
121-127 Av d’Italie 
75013 Paris 




L'HISTOIRE D'UNE 
MISE EN BOÎTE 


J. GUIGLIO 


I l était une fois... ies vraies his¬ 
toires commencent toujours 
ainsi... Donc, il était une fois un 
ORICIEN (affreux barbarisme) 
qui, au terme d'une année de tra¬ 
vail sur ORIC-ATMOS, en eut 
assez : 

— d'une alimentation anémique 
qui rendit l'âme deux fois, non 
sans emporter quelques centai¬ 
nes de lignes de programme, 

— d'une procédure de mise en 
marche/arrêt vraiment sommaire, 
— d'une toile d'araignée de fils, 
cordons, pour peu que la confi¬ 
guration dépasse le stade micro¬ 
ordinateur + moniteur, 

— et des problèmes d'alimenta¬ 
tion secteur, problèmes communs 
d'ailleurs, à pas mal d'autres 
micro-ordinateurs. 

Il aurait pu faire "avec", bien sûr, 
il préféra faire "sans", d'autant 
plus que la situation se compli¬ 
quait du fait que le système 
n'était pas installé en "fixe" ; il 
rejoignait le placard, l'utilisation 
terminée, avec les inévitables 
contraintes de branchements, 
débranchements, rangements, 
mauvais contacts..., j'en passe et 
des meilleures. 

Après maintes cogitations, j'ai 
abouti à la "boîte" qui, non seu¬ 
lement renferme l'ordinateur, une 
alimentation correcte, les cor¬ 


dons moniteur, magnéto, impri¬ 
mante, mais en plus, porte les pri¬ 
ses de courant nécessaires aux 
branchements des différents péri¬ 
phériques. J'ai pensé être utile à 
d'autres confrères, en faisant 
part de cette réalisation dont la 
description suit. 

DESCRIPTION 

On distingue deux parties : 

— l'alimentation et ses circuits 
annexes, 

— le coffret. 

L'ALIMENTATION 

ET SES CIRCUITS ANNEXES 

L'ENSEMBLE 
TRANFORMATEUR- 
REDRESSEUR (figure 2) 

Nous avons visé un schéma sim¬ 
ple, mais un dimensionnement 
généreux. La tolérance du micro 
aux variations de tension (fonc¬ 
tionnement correct de 8 à 12 V) 
n'impose pas une alimentation 
stabilisée. On voit sur la figure 2 
que l'ensemble est classique et 
comprend : 

— un transformateur 220/9 V — 
15 à 20 VA, 

— un pont redresseur 3 A — 50 
à 100 V, 


— un condensateur de filtrage 
1000 nF - 50 V. 

Nous avons jugé utile de piéger 
les surtensions éventuelles, par 
un découplage (2 x 0,1 iiF) au pri¬ 
maire et un autre (0,1 (iF + 
500 pF) sur le continu. Les cir¬ 
cuits alternatif et continu ont été 
protégés par des coupe-circuits 
fusibles appropriés. A signaler 
également, une diode électrolu¬ 
minescente rouge et sa résis¬ 
tance de protection (présence 
tension) et un cordon d'alimenta¬ 
tion tripolaire (phase-neutre- 
terre), même si, malheureuse¬ 
ment, les prises de courant ne 
distribuent pas toujours la terre. 

LES CIRCUITS DE 

MISE SOUS/HORS TENSION 

DU MICRO-ORDINA TEUR 

Remarque : Pour éviter l'enclen¬ 
chement du transformateur, la 
notice recommande après enfi- 
chage de l'alimentation sur le 
secteur d'effectuer la mise 
soüs/hors tension, par enfichage 
et retrait du jack alimentation. 
C'est logique, mais barbare et, à 
la longue, c'est une source de 
mauvais contacts et de fausses 
manœuvres. 

Pour pallier ces inconvénients, 
nous avons demandé au relais R, 
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par le truchement des interrup¬ 
teurs IG, BM, BP, d'assurer les 
séquences correctes d'enclen¬ 
chement et de déclenchement. 
Le fonctionnement est le suivant. 
La fermeture de l'inter IG met 
sous tension, outre les périphé¬ 
riques, l'alimentation continue, 
dont la présence tension est 
signalée par la LED rouge ; le 
relais R n'est pas excité, donc le 
micro n'est pas alimenté. L'appui 


du bouton BM excite le relais R 
qui ferme ses contacts R2 (auto- 
maintien) et R3 + R4 qui assurent 
la mise sous tension effective du 
micro-ordinateur, contrôlée par la 
LED jaune. Pour mettre hors ten¬ 
sion, l'appui de BA fait retomber 
R, donc coupe le micro. Le 
contact RI rend inopérant la cou¬ 
pure de IG si le micro n'a pas été 
mis hors tension par BA. De ce 
fait, la séquence préconisée par 


la notice, est réalisée d'une 
manière quasi-automatique. 

LE CIRCUIT 

DE DISTRIBUTION 220 V 

En aval de IG, on a disposé un 
certain nombre de socles de pri¬ 
ses de courant bipolaire -i- terre, 
destinés à l'alimentation des péri¬ 
phériques (moniteur, magnéto, 
cassette...). 
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Je pense avoir livré tous les 
secrets du schénna de principe 
(petits secrets). L'âme du mon¬ 
tage est évidemment le relais. Je 
disposais d'un modèle à 4 
contacts inverseurs ; ils sont tous 
utilisés. Moyennant quelques 
modifications de détail, il est pos¬ 
sible d'utiliser 2 contacts, sous 
réserve qu'ils aient les caractéris¬ 
tiques électriques suffisantes 
(pouvoir de coupure et tension 
d'isolement). 

ATTENTION 

Le courant 220 V est dangereux, 
mortel même. Toutes les parties 
métalliques nues portées à ce 
potentiel seront protégées par 
des capots (alimentation), solide¬ 
ment assujettis par vis. Dans le 
cas où ces capots seraient métal¬ 
liques, ils seront obligatoirement 
reliés au conducteur de protec¬ 
tion (terre). Il en sera de même 
pour toutes les parties métalli¬ 
ques du montage (transfo, par 
exemple). 

LE COFFRET 

CONCEPTION 

Le coffret doit : 

— contenir l'alimentation, 

— supporter les prises de courant 
et autres accessoires électriques, 

— permettre le rangement des 
cordons, 

— inclure le micro-ordinateur (de 
ce fait les cordons peuvent res¬ 
ter branchés en permanence côté 
ORIC), 

— servir de support au moniteur, 

— contenir éventuellement l'ali¬ 
mentation Péritel, un ampli et des 
hauts-parleurs pour la musique. 
De plus, il devra être facile à réa¬ 
liser, permettre un dépannage 
facile et, bien entendu, être doté 
du meilleur rapport qualité-prix. 
La taille de ce matériel est un 
compromis entre ces différentes 
exigences. 

DESCRIPTIF 

Sur le plan réalisation, on a opté 
pour la solution socle-embase + 
coque. 




SCHEMA DE PRINCIPE | 

Pc 

cordon d'oliniontation tfipoiawa 

Ra 

riaiatarKa 470 oham 1/2 W 


*qu<>é d'un* ont* d» courant 

C3 

condaniataur 1000 F — 50 V. 


2i 10/16 A«T 

C2 

cortdanaaieur 500 pF céramoua. 

Fui 

coupa-circLat fuaibia 0.2S A 

Cl 

condanaaiaur 0.1 aF 1000 V 

K* 

•ntarruptaur t bascula 3 A 

R 

rataia boCnria 12 V 4 contacta O/F 


250 V 


- 1 A 

Cl 

condanaataur 0.1 aP — 1000 V 

SA 

bouton pouaaoM d'arrêt — 1 

RI àR4 

contacta du raiao R 


contact 0 

P 

pnaaa da courant 10/16 A «T 

BM 

bouton pouaaoir marcha — 1 

T 

trartaformataur 220/6-9-12 V — 


contact F 


15 VA rmntmufn. 

Oa 

dioda êèactroKimrYaacanta tauna 

Fu2 

coupa-circuH luaibla 1.5 A. 

Ra 

rêaiatanca 470 ohma 1/2 W. 

Pr 

pont radraaaur 3 A — 50 V. 

J 

tack d'alimantation du micro- 

0« 

dioda *lactroiurT«r\aacanta rouga 


orda>ataur 


ALIMENTATION Schéma »t noin>ncUture matéftol 
Figure 2 
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Sode-ambate — Vue perapectiva AR. 


Figura 3 







il 



A pmi» caoutOxiMC - 

rtrtcriaux : conrr«p\aquc 
de 8 _ Tan •AUX As 11^6 
^s»Tftb\aqg.> : doaa% 
ou collât . 

fibi bon «mottiquc , 
enduit. ponça 
ftinturc ' noir wetina 
^couchet . 

ENSE.ne>LE : Cd\«\U ^ 

50CI.C. -v COQUE 


Figure 5 



• Socle-embase (figure 3). Il est 
composé : 

— d'une plaque de fond large¬ 
ment perforée, montée sur qua¬ 
tre pieds en caoutchouc. On y 
fixera la ou les alimentations, les 
amplis et les hauts-parleurs éven¬ 
tuels, 

— d'une platine verticale fixée à 
l'extrémité postérieure de la pla¬ 
que de fond. Cette platine sup¬ 
portera les prises de courant, les 
boutons poussoirs, l'interrupteur 
et les coupe-circuits fusibles. 

• La coque (figure 4). Elle 
comporte : 

— un plan incliné où s'encastre 
le micro-ordinateur, l'ajustage est 
un peu serré. C'est suffisant sur 
notre maquette. Pour les puristes, 
il n'est pas interdit de penser à 
des ferrures ou à des taquets de 
fixation — on y installe également 
les voyants, 

— des faces latérales verticales ; 
la face antérieure peut recevoir 
une poignée de transport et les 
faces latérales sont perforées au 
niveau de l'alimentation. 

La coque comporte à sa partie 
inférieure une ceinture de tas¬ 
seaux, sur laquelle vient se vis¬ 
ser le socle-embase. 

REALISATION (figure 5) 

On a adopté comme matériau du 
contreplaqué de 8 m. Les assem¬ 
blages fixes sont du type cloué- 
collé. La coque est vissée sur 
l'embase. Après construction et 
perçage de tous les trous, tout 
l'ensemble est enduit et soigneu¬ 
sement poncé. Deux à trois cou¬ 
ches de peinture satinée donne¬ 
ront un aspect soigné, quasi pro¬ 
fessionnel. La figure 5 donne les 
cotes principales de notre 
maquette. 

CONCLUSION 

Mieux qu'un long discours, la 
comparaison entre la figure 1 et 
la figure 6 montrera la "diffé¬ 
rence". C'était le but fixé. Bien 
sûr, l'usage aidant, d'autres idées 
sont apparues. Elles ne sont pas 
encore réalisées, expérimentas. 
Ce sera pour une autre fois... 
peut-être. 
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UN PAS 


T oujours présents 7 C'est 
bien I II faut dire que ce cours 
est distillé à doses homéopathi¬ 
ques et que vous avez tout le 
temps d'assimiler et d'expéri¬ 
menter les instructions apprises 
précédemment. J'en vois un qui 
ronge ses ongles d'impatience, 
là-bas I Nous allons donc 
commencer, sinon il ne pourra 
môme plus extraire de leurs enve¬ 
loppes en cellophane cassettes 
ou disquettes. Vous savez comp¬ 
ter 7 Alors, en piste pour l'arith¬ 
métique I 

INSTRUCTIONS 
DE BRANCHEMENT 

Bien vue, la feinte I On annonce 
l'arithmétique et on parle d'autre 
chose. Rassurez-vous, l'arithmé¬ 
tique suivra, mais nous aurons 
besoin de ces instructions de 
branchement assez rapidement, 
alors, autant les examiner de 
suite. 

Vous n'avez certes pas oublié 
l'existence du registre d'état 
contenant les indicateurs appelés 
"flags". 

Il existe un moyen de tester cer¬ 
tains indicateurs et de dérouter le 
programme en fonction de leur 
état. Voici les instructions corres¬ 


VERS L'ASSEMBLEUR 


pondantes : 

BCC : va à l'adresse indiquée 
si le bit C |carry = rete¬ 
nue) du registre d'état 
est à zéro. Le mnémoni¬ 
que signifie Branch if 
Carry Cleared (branche¬ 
ment si retenue effa¬ 
cée). 

BCS : est son complément et 
agit quand C = 1 (Carry 
Set = retenue position¬ 
née). 

BEQ ; Branch if Equal, c'est-à- 
dire si Z=1 (résultat 
nul). 

BNE : Non Equal quand Z = 0 
(résultat non nul). 

BMI : Branch if Minus agit 
quand le résultat est 
négatif, ce qui corres¬ 
pond au bit N = 1. 

BPL : Branch if Rus est le 
complément (N=0) et 
agit quand le résultat est 
positif ou nul. 

BVC : OVerflow Clear effectue 
le branchement pour 
V = 0 (pas de déborde¬ 
ment). 

BVS : OVerflow Set détecte le 
débordement V = 1. 

Ces instructions de branchement 

son suivies d'un nombre indi¬ 
quant la valeur de déplacement. 


Ce nombre est signé et codé sur 
un octet (valeur entre -128 et 
-f127). La valeur du déplace¬ 
ment étant ajoutée à l'adresse de 
l'instruction qui suit le Bxx, il en 
résulte un déplacement effectif 
compris entre -126 et +129. 
Ces instructions de branchement 
relatif sont très utilisées ; elles 
permettent entre autres d'obte¬ 
nir des programmes "relogea¬ 
bles" (ne contenant pas 
d'adresse absolue). Dans ce cas, 
on utilise souvent une astuce de 
programmation consistant à "for¬ 
cer" le branchement. Par exem¬ 
ple, CLC (Clear Carry) met le bit 
C à 0 ; suivi de BCC, la condition 
est toujours réalisée et le bran¬ 
chement effectué... 

Voici deux exemples de branche¬ 
ment extraits de la ROM ORIC. 

(listing 1) 

En 0007, on trouve un BCS. Le 
code machine est BO ; il est suivi 
de 03 correspondant aux nom¬ 
bres d'octets à sauter : ici 3 (on 
saute 4C, E7, DF codes du JMP 
$ DFE7 et le branchement a lieu 
en DOOC). 

Examinons maintenant le cas 
d'un branchement en arrière. 
C'est le BNE en D185. On veut 
se brancher à l'adresse 017B, 
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soit 12 octets en arrière. C'est la 
valeur F4 suivant le DO, code de 
BNE. 

(listing 2) 

Tout cela ne paraît pas évident au 
début, mais le deviendra par la 
suite, lorsque vous aurez beau¬ 
coup programmé et qu'une lon¬ 
gue barbe blanche ornera votre 
visage (pour les dames, pas de 
signe, puisqu'elles ne vieillissent 
pas... ). 

INSTRUCTIONS 

D'ARITHMETIQUE 

Nous avons groupé sous cette 
appellation les instructions per¬ 
mettant d'additionner, de sous¬ 
traire mais aussi d'incrémenter et 
de décrémenter le contenu des 
registres (ou d'un emplacement 
mémoire). 

Commençons par le plus simple : 
les opérations d'incrémentation 
et de décrémentation. Elles opè¬ 
rent par pas de 1. Incrémenter, 
c'est ajouter 1, décrémenter, 
c'est soustraire 1 au contenu ini¬ 
tial. 

Voyons un petit exemple : 

LDA #$12 
STA $01 
INC $01 
RTS 

L'adresse 01 est chargée avec la 
valeur hexadécimale 12 puis 
incrémentée (on y ajoute 1). Elle 
contiendra, en finale, 13. Evidem¬ 
ment, vu sous cet aspect, l'inté¬ 
rêt est limité. On aurait pu écrire 
LDA #$13 directement ! Vous 
verrez très vite que ces instruc¬ 
tions sont très utiles pour trans¬ 
férer des blocs mémoire ou, plus 
généralement, réactualiser des 
pointeurs. 

Il est important de noter que deux 
indicateurs du registre d'état sont 
affectés : N (signe) est à 1 quand 
le bit 7 de l'opérande y est. Z 
(zéro) passe à 1 quand l'opérande 
est à zéro (255-t-1=0 ne pas 
oublier I). 

Les registres d'index X et Y ont 
leurs instructions d'incrémenta¬ 
tion : devinez leurs mnémoni¬ 
ques ? INX et INY, original, non ? 
F^isque vous êtes sages, voici un 
petit exemple. Nous allons écrire 


5 fois la lettre Z au milieu de la 
première ligne de l'écran. Zzzzz I 
j'en entends un qui ronfle ! Si 
vous préférez, vous pourrez met¬ 
tre A ou astérisque, je ne force 
personne. 

(listing 3) 

Pas très académique, le pro¬ 
gramme, mais il suffit pour illus¬ 
trer nos propos. 

1000 : on charge le registre X 
avec la valeur 0. Il nous 
servira de compteur. 
Quand on arrivera à 5, on 
arrêtera (question de 
piquets et d'intervalles I). 
1002 : l'accumulateur contient 
le code ASCII de la lettre 
Z. 

1004 : on écrit Z à l'adresse 
$6690,X (adressage 

indexé par X permettant, 
de mettre le code de Z 
dans la mémoire écran 
aux adresses 6690 à 
6694. 

1007 : on incrémente X pour 

"pointer" la prochaine 
position écran. 

1008 : on transfère X dans A car 

l'opération qui suit (le 
CMP) ne peut porter que 
sur l'accu. 

1009 : teste si on a atteint la 

butée. 

1006 : si l'accu ne contient pas 
5, on recommence. 

100D : terminus I 
Comme il est bientôt l'heure d'al¬ 
ler déjeuner, nous accélérons et 
examinons de suite l'opération 
inverse, DEcrémentation. Elle 
nous permettra de simplifier le 
programme ci-dessus. 
Décrémenter, c'est retrancher 1 
à l'opérande. 

Ainsi : 

LDA #$12 
STA $01 
DEC $01 
RTS 

Que contiendra l'adresse 017 11 
hexadécimal. Vous avez toute 
ma considération. 

Comme les registres X et Y 
étaient jaloux, ils ont eu droit, eux 
aussi, à leurs instructions de 
décrémentation : DEX et DEY. 
Une chose à retenir : 

0-1 =255... mais vous le 


saviez I 

Les instructions d'incrémentation 
et de décrémentation existent 
dans les mode d'adressage : 
page 0 INC $ 01 
étendu DEC $6000 
étendu indexé INC $6680,x 
page 0 indexé DEC $05,x 
et implicite pour DEX, DEY, INX, 
INY... 

Grâce à DEX, le programme pré¬ 
féré de notre ami Zorro devient : 
(listing 4) 

Il est simplifié du fait qu'on peut 
directement détecter (grâce au 
bit N) le passage en négatif du 
compteur X (4, 3, 2, 1, 0, 
255= -1). 

1008 : recommence l'opération 
tant que le contenu de X 
est positif. 

Et si l'on désire ajouter ou sous¬ 
traire une valeur différente de 1 ? 
Bonne question I La réponse est 
avec les instructions ADC et 
SBC ; addition et soustraction 
tenant compte de la retenue. 
Elles concernent pratiquement 
tous les modes d'adressage. Pour 
l'addition, l'accumulateur con¬ 
tiendra, après l'opération, sa 
valeur initiale augmentée de la 
valeur qu'on lui ajoute et de la 
retenue. Bien sûr, pour addition¬ 
ner sans retenue, il suffit de la 
mettre à zéro auparavant (CLC : 
Clear Carry). 

Voici un exemple : 

CLC 

LDA #$5 
ADC #$2 
RTS 

L'accumulateur contient la valeur 
5 au départ. On y ajoute 2. Je 
pose mon stylo pour ajouter aux 
doigts de ma gain gauche deux 
de ma main droite, ça donne 7. 
En plus, vous savez maintenant 
que je suis droitier I 
Si on n'avait pas pris le soin de 
mettre la retenue à zéro par CLC, 
on aurait pu obtenir un résultat 
erroné si la retenue était laissée 
à 1 par une opération précédente. 
L'addition elle-même peut, bien 
entendu, générer une retenue. 

Si les nombres sont rangés à 
deux emplacements mémoire 01 
et 02 et que le résultat doit être 
conservé à l'emplacement 03, on 
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écrira : 

CLC 

LDA $01 
ADC $02 
STA $03 
RTS 

La soustraction opère de la même 
manière. Cette fois, la retenue 
devra être positionnée à 1 avant 
l'opération. L'instruction SEC 
(Set Carry) le fait. 

SEC 

LDA #$5 
SBC #$2 
RTS 

Pourquoi positionner la retenue à 
1 avant l'opération ? Tous sim¬ 
plement parce que l'instruction 
soustrait de l'accu le contenu de 
la mémoire citée et le complé¬ 
ment de la retenue. 

Les opérations ADC et SBC peu¬ 
vent porter sur des nombres de 
seize bits. Savez-vous comment 
on fait 7 On additionne (ou on 
soustrait) tout simplement les 
deux moitiés. La retenue, éven¬ 
tuellement générée par l'opéra¬ 
tion portant sur les octets de 
poids faible, est répercutée sur 
les octets de poids fort. 
Prenons l'exemple de l'addition. 
Le premier nombre est logé aux 
adresses CK) et 01 (poids faible, 
poids fort), le second, aux adres¬ 
ses 02 et 03. On rangera le résul¬ 
tat en 04 et 05. 

Demandez le programme ! 
(listing 5} 

Simple comme bonjour I Si vous 
voulez l'essayer après avoir intro¬ 
duit le programme machine par 
les moyens que vous connaissez 
parce que vos êtes de bons élè¬ 
ves et que vous lisez THEORIC 
depuis toujours, écrivez le pro¬ 
gramme Basic suivant qui vous 
demande les deux nombres à 
additionner et retourne le résul¬ 
tat à l'adresse 4. La somme ne 
doit pas dépasser 65535... 
(listing fi) 

Une sage précaution aurait été de 
mettre un CLD (forcer le mode 
binaire) avant l'addition ; nous 
verrons cela une autre fois. 

Le dernier sorti ferme la porte I 


1 

DOOO: 

A9 

00 


LDA 

«$00 

D002 : 

85 

28 


STA 

$28 

D004 : 

20 

E2 

00 

JSR 

$00E2 

D007 : 

BO 

03 


BCS 

$DOOC 

D009: 

4C 

E7 

DF 

JMP 

$DFE7 

DOOC: 

20 

16 

D2 

JSR 

$D216 

2 






D178 : 

4C 

24 

DF 

JMP 

$DF24 

D17B; 

20 

65 

DO 

JSR 

$D065 

D17E: 

AA 



TAX 


D17F: 

20 

SD 

DI 

JSR 

$D18D 

0182: 

20 

E8 

00 

JSR 

$OOE8 

D185 : 

DO 

F4 


BNE 

$D17B 

D187 : 

60 



RTS 


3 






1000: 

A2 

00 


LDX 

#$00 

1002 ; 

A9 

5A 


LDA 

#$5A 

1004: 

9D 

90 

BB 

STA 

$BB90,X 

1007 : 

E8 



IIMX 


1008: 

SA 



TXA 


1009 : 

C9 

05 


CMP 

#$05 

lOOB: 

DO 

F5 


BNE 

$1002 

lOOD: 

60 



RTS 


4 






1000: 

A2 

04 


LDX 

#$04 

1002 : 

A9 

5A 


LDA 

#$5A 

1004 : 

9D 

90 

BB 

STA 

$BB90,X 

1007 : 

CA 



DEX 


1008 : 

10 

FA 


BPL 

$ 1004 

lOOA: 

60 



RTS 


5 






1000: 

EA 



NOP 


1001 : 

18 



CLC 


1002 : 

A5 

00 


LDA 

$00 

1004 : 

65 

02 


ADC 

$02 

1006 : 

85 

04 


STA 

$04 

1008: 

A5 

01 


LDA 

$01 

lOOA: 

65 

03 


ADC 

$03 

IDOC: 

85 

05 


STA 

$05 

lOOE: 

60 



RTS 


100F: 

EA 



NOP 


6 






10 INPUTNl, 

N2 




20 D0KE0,N1 

:D0KE2,N2 

:CALL#1000 

30 PRINTDEEK<4) 




40 GOTOlO 
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UN MONITEUR A L'ESSAI 



L limage fournie par ORIC sur 
la sortie RGB (pour les non 
initiés) est d'excellente qualité. Le 
problème naît dès que l'on veut 
travailler sur le téléviseur fami¬ 
lial... Entre le dernier feuilleton à 
la mode et la création de votre jeu 
d'aventures, quel dilemme ! 

La solution consiste à travailler 
sur un moniteur monochrome 
dont le prix reste abordable par 
rapport à un "couleurs". Toute 
la phase initiale de mise au point 
d'un programme peut, en effet, 
se passer d'écran couleurs... 
D'ailleurs, c'est un bien pour vos 
yeux I Un écran couleur possède 
une "brillance" nuisible et la fati¬ 
gue se fait rapidement sentir. 
Un moniteur monochrome pallie 
ce défaut : son écran, vert ou 
ambre (orangé) protégera votre 
vue. Mais ce n'est pas la seule 
qualité d'un moniteur. Son tube 
et ses circuits vidéo (les circuits 
qui traitent l'image) sont conçus 
pour permettre l'obtention d'une 
image parfaitement définie. Cela 
s'obtient (sans entrer dans les 
détails techniques) par une bande 
passante très large (autour de 
20 MHz) autorisant le passage, 
sans atténuation ni déformation, 
de signaux aux fronts de montée 
et descente très raides. Plus la 
bande passante est large, meil¬ 
leure est la qualité de l'image... 
Evidemment, le prix est fonction 
des performances. 

Compte tenu de ce qu'on peut 
attendre d'un ORIC, nous avons 


choisi un moniteur placé en milieu 
de gamme (prix moyen 1300 F). 
On peut trouver moins cher, mais 
la qualité s'en ressent. 

Le moniteur est de marque SAM- 
WOO, importé par la société GES 
à Paris. Nous nous sommes pro¬ 
curés le modèle 9 pouces (diago¬ 
nale écran environ 22 cm) vert. 
Disons-le tout de suite, l'esthéti¬ 
que est fort agréable. Le boîtier 
est couleur "crème" (pas crème 
au chocolat... ). Le tour de l'écran 
est gris foncé. Une trappe, à 
droite de l'écran, dissimule les 
réglages de lumière et contraste. 
La mise sous tension s'effectue 
par un commutateur situé sous 
cette porte. Une diode électro¬ 
luminescente verte indique le 
fonctionnement. 

A l'arrière de l'appareil, on trouve 
les entrée et sortie vidéo. Les 
connecteurs sont de type CINCH. 
Un commutateur 75 ohms ou 
infini permet de choisir l'impé¬ 
dance d'entrée. Une série de qua¬ 
tre trous permet, au moyen d'un 
fin tournevis, de retoucher aux 
réglages de synchronisation, si le 
besoin s'en fait sentir. Le cordon 
d'alimentation est pourvu d'un 
connecteur avec prise de terre. 
L'image est très agréable, et la 
bonne luminosité permet de tra¬ 
vailler dans des pièces très éclai¬ 
rées. Petit défaut dans ce cas, si 
la lumière est "poussée à fond", 
on constate, sur les angles, une 
perte de définition (les P et S de 
CAPS deviennent légèrement 


flous). Peut-être est-ce un défaut 
du modèle essayé. A part cela, 
les performances sont très hono¬ 
rables... 

Les dimensions sont 21 x22x 
27 cm pour le modèle 9 pouces. 

PERFORMANCES 

VISUALISATION MAXIMUM ; 
80 caractères ’x 24 lignes 
(matrice 5x 7) 

BANDE PASSANTE VIDEO : 

20 MHz 

RESOLUTION HORIZONTALE : 
1000 lignes au centre. 
CONSOMMATION : 

30 W. 

L'appareil est fabriqué en Corée. 
Il porte la référence DM 093. Le 
modèle 12 pouces (DM 214) 
coûte environ 200 F de plus. Au 
rapport qualité-prix, ces moni¬ 
teurs sont très bien placés. 


- Essai pour THEORIC -- 

nonitMT 9 ’ ' SAHMOO 


- Essai pour THEOPIC 

Mon 1 1 ei.ir 9 ‘ ‘ sHMWOi • 
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VISIBILITÉ DES COULEURS 


Alain TORTOSA 


T ous, les possesseurs de moni¬ 
teur monochrome vert ou 
ambré de marque NOVEX ou 
autres, ont pu constater que cer¬ 
taines "couleurs" ne pouvaient 
se distinguer à l'écran. 

Ainsi, le bleu et le vert, le bleu et 
le rouge, le rouge et le vert, le 
magenta et le jaune, ainsi que le 
jaune et le cyan n'apparaissent 
pas. 

Cela fait quand même beaucoup ! 

Le problème vient du fait que 
rORIC n'est pas pourvu de sor¬ 
tie vidéo composite (sortie 
compatible N&B), mais d'une sor¬ 
tie RVB. 

Le moyen le plus simple, pour 
transformer un signal RVB- 
Synchro en un signal vidéo 
composite, est la sommation 
pure et simple des signaux. C'est 
le principe utilisé par le câble 
ORIC dont voici le schéma. 

Sortie ORIC 


Rouge - 


V^rt 

Bleu - 

Sgnchro - 

Messe - 

” sortie 
"sighel 
vidéo 

composite" 


Ce procédé, le plus simple, ne 
tient pas compte d'un fait impor¬ 
tant que voici : 

La sensibilité de l'œil humain 
n'est pas constante selon les 
couleurs. Ainsi, il a été démontré 
que, pour qu'un signal vidéo soit 
compatible en couleur et en noir 
et blanc, il faut que : 

Y = 0,30.R-t-0.59 B + 0.11 V 


Y étant le signal vidéo composite 
et R, V, B les signaux correspon¬ 
dant aux trois couleurs primaires. 
Or, rORIC possède, en sortie, les 
trois signaux RVB dont nous 
allons tirer le signal Y. 

Voici une solution : 

N'ayez crainte, vous n'aurez pas 
à vider votre portefeuille pour 
enfin pouvoir regarder votre 
écran sans craindre de perdre des 
informations. 

LISTE DES COMPOSANTS 

Cela paraît un peu ridicule, mais 
enfin... 

Voilà, il vous faut en tout et pour 
tout quatre résistances dont voici 
les valeurs : 

Rr = 330 ohms 
Rv = 150 ohms 
Rb = 560 ohms 
Rs = 220 ohms 
et c'est tout. 

MONTAGE 

Vous pouvez modifier votre câble 
d'origine et même intégrer les 
résistances dans la prise DIN 
existante. 


Vous devez donc passer de 
ce montage : à celui-ci : 




Les seules précautions à prendre 
sont de bien vérifier qu'il n'y ait 
pas de courts-circuits avant de 
refermer la prise DIN. 

(On doit vérifier que les résistan¬ 
ces ne touchent pas la masse ni 
même le blindage de la fiche, qui, 
lui, est relié à la masse au sein 
même de l'ORIC. Au besoin, on 
emploiera du scotch isolant.) 


Schéma : 


R - 

H Rr 

J— 


V - 

W7' 

J- 

>■ ' » sortie “signe! vidéo composite" 

B - 

-1 Rb" 

J- 

• 

competible toutes couleurs 

S - 

■H Rs 

“H 



Messe — 
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20, rue de Montreuil 94300 VINCENNES - Tél. : (1) 328.22.06 

OUVERT DU MARDI AU SAMEDI de 10 h 30 à 13 h 30 et de 1 5 h 30 à >9 h 30 

REVENDEUR OFFICIEL AGRÉÉ ORIC-FRANCE 




Rillonga Péritel 
N» soyu plus ‘collé* é fècrin I 

□ rallongt.60 F 

Syntbétisour vocal 

Enfin votre Oric peut s txpnmor f Anglais d'origini 
il gardera son accani mais, grice i un programme 
bâtie, vous dira ‘bonjour', ‘gagné* ou vous 
apprendra Tangiais ou raltemand. 

O synthétiseur vocal 

(avec cible connexion).. . 550 F 

_485 F 

Cane E/A 

Pour transformer votre Oric an cemralo de me¬ 
suras. Pouibitité de brarKher plusieurs cartes 

□ cartaBE/A. 395 F 

Carie E/S 

Vous ptrmei de commander moteur, rtliis. lampe, 
sonnerie, projecteur 

□ carte 16 E/S_395 F 



Rallonge Joyatick 
‘Eclater* vous sans rien arracher I 
O rallonge joystick 1.20 m.. 


120 F 

S 


Intertace Pérital/$oca« 

Pour ceux qui n'ont pas de prise pirnel sur leur 
TV. 

□ interface C.G V... 500 F 



Interrupteur 
Ne counar plut le risque de faire sauter la ROM 
□ interrupteur d'alimentation ....60 F 


Alimentation 6.9 ou 12 V 
Pour votre péritel. calculatrice 
□ alimentation.-.. 




.70 F 



Coasetta spéciale micro 

□ Its 5. 

□ los 10. 


45 F 
.80 F 


Cortt BuHar 

Amplifie las signaux du bus permettant ta con¬ 
nexion de plusieurs Interfaces. Munie d'une prise 
pour alimtniation oxtorno si nécassoiro 
□ certi bufftr.N.C. 




Imprimante stikosba GP SOOA 
50 coractéres par seconde. 80 colonnes papier 
informitiquo permet l’édition do textes et gra¬ 
phismes do qualité correcte pour un prix raison¬ 
nable La plus répondue en informitiquolatniliolo 
□ imprimanteSEIKOSHAGP500A_2450 F 


Carte mère 

Grâce à Ci cible vous pourrtr connecter 3 inttr- 
faces et gerdere; la possibilité de brancher un 
Itcttur dt disquettes 

□ carte mère 3 slols .. 205 F 

□ mime modèle mais 1 stot r...95 F 


JASMIN 

La lecteur dv disquette que votre Oric préfère 
Permet, entre autres, de rKOpier sur disquettes 
les logiciels (même plombé^ sur cissette. 

□ lecteur simple ibte.-,.-.2990F 

□ lecteur double tlti-3690F 



ATMOS 48K 
Manuel en français, 
bloc alimentation 

a.. 


cible magnéto.. 
1585FIII 



□ 50 super-jeux* 



145 F 

B ^ ■ 

.ISOf 

□ Elyséis-.-..1.. 

. .145 F 

B V * B 

sur une cassette .. 


M (! 


• 



19n F 





i9n F 





i7n F 





i9n F 

□ Moniteur assembleur dise ssembleur 

— 140 F 

7fU1 F 


.120 F 


. 90 F 



140 F 


.. 90 F 


IRD F 


14ft F 



280 F 


180 F 


95F 

□ Traitamant da texte. 

215 F 


14fl F 

□ Bia bia-ble. 

.180 F 


180 F 


.100 F 

□ Intox et Zoé* 

□ La retour du 1 


110 F 

140 F 


inn F 


□ Island of daath 

100 F 


190 F 


. 8S F 


lAD F 

□ MARC. 

.95 F 



180 F 


...90 F 



95 F 


.. 95 F 



120 F 

□ Arana 3000 

100 F 



120 F 


. 80 F 



n, 9tif 

□ Xénon.. 

.IlOf 


RD F 

□ 2grgan .... 

..110 F 



.. 95 F 


. 105 F 



, 9^ f 


110F 



95 F 

□ GalxxyS 

95 F 





750 F 



95 F 


1ROF 



.120F 


. 140 F 



. 120 F 


.105 F 


140 F 


. 105 F 



95 F 


IRA F 


. .. 140 F 


.95 F 


95 F 


.155 F 



.120 F 

nWnrtdwarlt 

95 F 



.. 120 F 


95 F 



.. 120 F 


95 F 


.140 F 


140 F 


... 140 F 


190 F 



120 F 


190 F 



95 F 


95 F 



... 140 F 


170 F 


160 F 


. 120 F 


140 F 


ton F 


120 F 


140 F 

□ Terminus. 


120F 

□ Znelympics. 

120 F 


LOGICIELS AMSTRAD DISPONIBLES 


□ GALAXIA.75 F 

un très beau combat galactique 

□ ALIEN BREAK IN .100 F 

superbe jeu d'arcade ou vous choisirez parmi 
plus de 10 tableaux l'option 'pilote' ou 'arcade' 
et la vitesse de votre vaisseau 

□ GRAND PRIX .100 F 

la formule 1 dans un fauteuil 

□ 3DM0NSTER .100 F 

sortez d'un labyrinthe en trois dimensions et 
sur trois niveaux parsemé d'embûches 



QATOMSMASHER.100 F 

au cœur d'une centrale nucléaire vous allez 
'bombarder' les protons en empftchant l'en, 
crassement et l'Mévetion de la température 

□ COUNTRY COHAGE_125 F 

fantastique jeu de stratégie financière • texte 
et superbes graphismes 

□ STAR AVENGER.80 F 

parmi les neufs parcours possibles dirigez 
votre vaisseau spatial en évitant les tirs 
ennemis 

□ SUPER-PROMOTION AMSTRAD 

les 7 logiciels ci-contre : 680 F 

1 joystick "TRIVITT" 140 F 

660 F !!! 


BranchcmMl ordiMttur/iMgaéloscopa 
Grâca è cane inicffacu lafsaai brancher an per- 
mananca votre ordinateur et votre magnétoscope. 
Prévoir une alimentation 12 V 
O interface ordi./magnétosc -.345 F 


Interface M.I.O.I. 

La standard M.I.D.I. est la standard 'RS232‘ da 
la musique. Connecté è un synthétiseur. tMîla à 
rythma, orgue., vous programmarex (an bastc) 
las plus balles mélodies 

□ interface M.I.O.I_N.C. 



Moaiteur 12" 

Splendide moniteur 12* monochrome vert ou 
ambra. Un modèle professionnaf è un prix grand 
pubbe. 

□ monilaur12*vartouambra.. 1400 F 



Mannasmann MT 80 S 

Limpnmanté 'lop niviiu' tn informiliqui fimi- 
lialelOOcaractèras par secoruie. Papter normal 
ou informatique. Entrainement par friction ou 
traction. Si vous recherchai une qualité ‘courrier*, 
la MT 80 vous donnera plus que des satisfactions 
tant pour la texte que pour la graphisme 
□ Mannasmann MT 80ft_— 



Joystick TIRVin 
La ‘MUST* an matièrt da loysiick 18 diract»oni 
cantact par micro contact robuste, élégant précis 
d ne vous décevra pas. garanti 1 an. compati¬ 
ble standard ATARI et MSX 
□ joystick TIRVin. .140 F 



Interface tous feux 

Grâca à cat interface programmable vous utiii- 
saraz vos joysticks avec tous vos logiciels de jeux. 
□ interface tous jeux __ 425 F 



imprimants MCP 40 
L’imprimante 4 couleurs aux couleurs d'ORiC ! 
□ impnmante MCP 40 1600 F 


MODEM ' 

Votre ORIC s'ouvra sur Textérieur. Il ‘discute’ 
avec ses sembla blés al accéda au réseau ’minilar. 
Fourni avec interface intégrée al logiciel 
□ modem --- -1490 F 


ii: 


Magnétophone 
Ce magnétophone spécialameni conçu pour les 
micro ordinateurs vous évitera bien des soucis. 
Entrée DIN ou Jack. Niveau réglable Témoin 
sonore et lumineux. Alirnamation intégrée 
□ magnétophone .. 49SF 



Moniteur Couleur 

Superbe moniteur couleur sonore. Ecran 14". En¬ 
trée RV6. pérHti. Particulibramant adapté è TOric 

□ moniteur couleur 2895 Fl 

CâWe Imprimante u; 

Vous permet de connecter votre Ork â n'importe ^ 

quelle imprimanie au standard ‘centronic* o 

□ clhlt impfimunf - ISn f q 

Z 

Cible Moniteur ^ 

Pour brancher votre Oric I un moniteur mono- b 

chroma ^ 

□ câbla moniteur..55 F 

Z 

- .8 

>< 
C 


COMMENT COMMANDER : 

> Cochar lafsl ertidefs) désiréls) ou faites-en une ksta sur une leuiBe i pert • Fartes le total + frais de port (20 F pour achats inférieurs é 500 F. 40 F de 500 à 1000 F. 60 F pour tout achat supérieur i 1000 F). 

Je possède ; QORICI □ ATMOS 

NOM ■__ PRENOM •_ 


- TEL :- 

ADRESSE : __CODE POSTAL 

Mode de paiement ; □ chèque □ mandat □contre-remboursement (prévoir 20 F de frais) 
envover le tout à : ORDIVIDUEL 20, rue de Montreuil 94300 VINCENNES 


(/) 

O 

Z 

(/) 

D 

O 


. ViaE : 


ORC3IS4 
























































































































































































DEBUTANTS 


NECESSITES DE LANALYSE 


N ous avons pris notre premier 
contact avec l'ordinateur et 
son clavier. Nous savons l'utiliser 
comme une calculatrice, et il 
nous a montré combien il est exi¬ 
geant dans son dialogue avec 
nous. Nous avons vu également 
que, faire un programme, c'est 
assembler une suite d'instruc¬ 
tions élémentaires précédées 
d'un numéro de ligne. Allons plus 
loin... 

ANALYSE 

DE LA SITUATION 

Avant de programmer quelque 
chose, il faut analyser la situa¬ 
tion. On dispose d'une sorte de 
"cahier des charges", et on exa¬ 
mine de quelle manière on peut 
aboutir au résultat. Cette phase 
est l'analyse du problème. Ça 
vous paraît compliqué ? Il n'y a 
pas lieu de s'affoler, car nous 
sommes conçus pour accomplir 
ce travail : notre cerveau le fait 
presque à notre insu... 

Prenons un exemple : nous som¬ 
mes au volant d'une voiture et 
nous voulons tourner à gauche... 
Le cerveau commande : 

— mettre son clignotant à gau¬ 
che, 

— ralentir, 

— attendre que les véhicules 
venant en face soient passés, 

— tourner, 

— redresser la direction, 

— ôter le clignotant (si le levier 
n'est pas revenu tout seul). 
Cette analyse peut se traduire 
sous forme d'un diagramme 
appelé organigramme ou ordino¬ 
gramme. 

L'ORGANIGRAMME 

C'est le schéma logique reprodui¬ 


sant la suite d'opérations à réali¬ 
ser. Les symboles utilisés peu¬ 
vent être : 



Reprenons notre analyse précé¬ 
dente et mettons-la sous forme 
d'organigramme. Figure 1 

Voilà, avec un exemple "non 
informatique", comment on peut 
établir le lien entre la phase 
d'analyse et l'élaboration de l'or¬ 
ganigramme. 

L'étape suivante sera la program¬ 
mation, phase qui consiste à uti¬ 
liser au mieux les possibilités de 
la machine pour traduire, dans 
son langage, l'organigramme. 
Nous ne saurions que trop 
conseiller à nos lecteurs le res¬ 
pect de cette démarche avant de 
se lancer dans l'écriture d'un long 
programme. Il sera beaucoup plus 
facile, de le reprendre pour le 
compléter, voire l'améliorer, en se 
reportant à l'organigramme. 
Mais, revenons-en à la program¬ 
mation et, puisque cette page est 
celle du débutant, nous allons 
examiner les possibilités qui nous 
sont offertes pour accomplir au 
mieux notre travail. 

LES VARIABLES 


L'ordinateur accomplit des opé¬ 
rations sur des valeurs rangées à 
une adresse de sa mémoire. Par 
commodité pour le programmeur, 
ces valeurs peuvent être appelées 
par un nom : ce sont des varia¬ 
bles. Chaque variable, à sa créa¬ 
tion dans le programme, sera ran¬ 
gée à une adresse (dans une zone 
spécifique de la mémoire) où l'or¬ 
dinateur saura la retrouver. Pour 
simplifier, on pourrait comparer 
ces emplacements aux boîtes 
aux lettres d'un immeuble, repé¬ 
rées par le nom du locataire... 
L'ORIC admet des variables dont 
les noms peuvent être représen¬ 
tés par plusieurs caractères. Il y 
a donc tout intérêt à choisir des 
noms représentatifs : TVA, 
VITESSE, FRUITS, etc. Attention 
néanmoins, l'ORIC considérera 
comme identiques deux variables 
commençant par deux lettres 
identiques. Ainsi VITESSE et 
VITRE ne seront pas différen¬ 
ciées, la reconnaissance s'effec¬ 
tuant sur "VI", les deux premiè¬ 
res lettres. 

Essayez : 

VITRE = 1 (RETURN) 

PRINT VI (RETURN) 

Vous obtiendrez 1 pour VI... 

A partir de maintenant, nous ne 
vous dirons plus d'appuyer sur 
RETURN, 

Autre impératif de l'ORIC, une 
variable ne doit pas contenir, 
dans son nom, un mot-clé du 
Basic. Exemple, 10 PRINTEMPS = 
1 provoquera, à l'exécution du 
programme, une erreur (SYNTAX 
ERROR IN 10). 

PRINT TOTO (sans numéro de 
ligne) affichera le même mes¬ 
sage. Dans les deux cas, ORIC a 
reconnu les mots "PRINT" et 
"TO" dans le nom de la variable. 
Les variables doivent être écrites 
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en majuscules et commencer par 
une lettre. Elle peut être suivie de 
chiffres. 

LES TYPES 
DE VARIABLES 

Il existe plusieurs types de varia¬ 
bles : 

— les variables numériques, 

— les variables caractères. 
Nous verrons aussi qu'elles peu¬ 
vent être organisées en tableaux. 
Avant d'être utilisée, une varia¬ 
ble doit avoir été initialisée. Cette 
opération porte le nom d'affecta¬ 
tion et s'écrit en Basic : 

LET A = 3 

LET TVA =18.6 

Le mot LET peut être omis dans 

le Basic de l'ORIC. Le signe = ne 

signifie pas une égalité, au sens 

algébrique du terme, mais une 

assignation : on donne à A la 

valeur 3, à TVA la valeur 18,6. 

Remarquez, au passage, que la 

virgule est représentée par un 

point. 

Parmi les variables numériques, il 
existe une "sous-classe" : les 
variables "entières" dont la 
valeur sera comprise entre 
32767 et -32768. Leur nom 
doit être suivi du signe %. On 
écrira A% = 10. 

Si on écrit A% = 18.6, PRINT A% 
donnera 18 : la décimale a dis¬ 
paru. 

Ces variables présentent l'intérêt 
d'être codées sur deux octets. 
Elles occupent moins de place 
mémoire que les variables relies. 
Hélas, et curieusement, l'ORIC 
qui devrait les traiter plus rapide¬ 
ment, le fait plus lentement que 
les variables réelles... 

Les variables réelles sont codées 
en "virgule flottante". Cette 
notation, fort complexe, ne sera 
pas détaillée ici car elle sort du 
cadre de la rubrique. Elles per¬ 
mettent de représenter des nom¬ 
bres compris entre 1,7.10®® et 
2 , 94 . 1039 . 

L'ordinateur manipule aussi les 
chaînes de caractères. Pour attri¬ 
buer un nom à un personnage, on 
peut écrire N$ = "CHARLIE". 
L'ensemble compris entre guille¬ 
mets est appelé chaîne de carac¬ 
tères. Le signe $ identifie ce type 


de variable. Nous verrons plus 
loin quelles manipulations sont 
permises sur les chaînes de 
caractères... 

Les variables peuvent être 
regroupées en tableaux. Exem¬ 
ples : les puissances de 2, les 
jours de la semaine. Dans ce cas, 
toutes les variables du tableau 
portent le même nom et.sont dif¬ 
férenciées par un indice, fonction 
de leur position dans le tableau. 
Un tableau peut avoir plusieurs 
dimensions. Aie I Ça devient plus 
difficile à imaginer. 2, 3 dimen¬ 
sions, c'est facile, mais au-delà... 
On peut imaginer alors le tableau 
comme un supermarché avec : 

— des allées (dimension 1 ) 
[zone du magasin], 

— des rayons (dimension 2) 
[habillement], 

— des "gondoles" (dimension 3) 
[sous-vêtements], 

— des produits (dimension 4) 
[chaussettes, etc... ]. 

Pour créer un tableau, il existe 


une instruction spécifique : DIM 
qui dimensionne les différents 
éléments. 

DIM A% (32) crée un tableau de 
33 éléments dont le nom est 
A%(0), A%(1)... A%(32). 

DIM N$( 12,22) dimensionne un 
tableau de 13 lignes sur 23 
colonnes. 

L'ORIC admet qu'on omette l'ins¬ 
truction DIM et, dans ce cas, le 
tableau est considéré comme 
ayant dix éléments. 

Il est interdit de redimensionner 
un tableau en cours de pro¬ 
gramme, ce qui provoquera une 
erreur. Il est bon de grouper les 
DIM en début de programme. 
Avec les quelques instructions 
que nous venons de voir, essayez 
d'imaginer un programme capa¬ 
ble d'associer le jour de la 
semaine à son numéro d'ordre. 
Sachant que PRINT permet d'af¬ 
ficher les résultats... Nous ver¬ 
rons, la prochaine fois, comment 
améliorer votre programme. 



Figure 1 
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DOMPTEZ VOTRE MICRODISC 


N OUS VOUS proposons d'es¬ 
sayer de tirer meilleur parti du 
Microdisc accompagné de ses 
DOS (VI. 1 ou XL DOS). Pour 
cela, 5 parties : courte présenta¬ 
tion générale, les variables systè¬ 
mes, les principales routines et 
leurs paramètres, l'organisation 
des disquettes, l'organisation des 
fichiers sur XL DOS. 

GENERALITES 

Votre unité de disquettes se 
compose en fait de deux parties 
très différentes (sans compter 
l'alimentation) : le lecteur 3 pou¬ 
ces et le contrôleur. 

Le lecteur est relié au contrôleur 
par un câble tout à fait standard, 
aux normes Shugart. Il n'a rien de 
particulier et peut aussi bien être 
un 3 pouces qu'un 5 pouces ou 
qu'un 3 pouces et demi, double 
face (c'est-à-dire deux têtes, per¬ 
mettant de lire les deux faces 
d'une disquette sans la retourner. 
Mais attention, la disquette tour¬ 
nant toujours dans le même sens, 
la face B sera écrite "à l'envers”), 
ou simple face (une seule tête). 
Une dernière remarque au sujet 
du lecteur, ou plutôt des disquet¬ 
tes. Certaines sont marquées 
double face (FC 2 ou CF 2), d'au¬ 
tres sont marquées simple face 
(FC 1). La seule différence est 
que, dans le premier cas, les deux 
faces de la disquette sont testées 
par le fabricant, alors que dans le 
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deuxième cas, seule la face A est 
testée. Il est vrai qu'on a rare¬ 
ment des problèmes avec les dis¬ 
quettes elles-mêmes. 

Le contrôleur est en fait un terme 
abusif. Il se compose de deux 
parties : 

— le contrôleur de disquettes 
proprement dit, qui est un circuit 
très spécialisé (ici un Western 
Digital 1793) qui tourne à 8 MHz. 
Il s'occupe de générer les signaux 
de commandes du lecteur, selon 
les instructions que l'on place 
dans son registre de commande ; 

— la deuxième partie est en fait 
une interface qui permet à l'ORIC 
de dialoguer correctement avec 
le WD, mais aussi de commander 
facilement la RAM Overlay, ou 
d'adresser l'EPROM (8 k-octets) 
qui permet le démarrage du 
système. Cette partie est réalisée 
à l'aide de circuits logiques clas¬ 
siques. 

Cette description est valable pour 
la plupart des lecteurs pour 
micro-ordinateurs. 

Nous terminerons cette partie par 
une description des registres 
d'entrée/sorties du Microdisc. 
Les 4 premiers registres sont 
ceux du WD 1 793 et n'ont rien 
de particulier à ORIC. Leur des¬ 
cription est donnée à partir de 
découvertes personnelles, et 
confirmées par les documenta¬ 
tions constructeur. Pour les 
autres, il y a pas mal de flou, 
ORIC Products se tait... 


#310 : CR Command Register, 
registre de commande (écriture 
seulement). 

STR : STatus Register, registre 
d'état (en lecture seulement). 
#311 : TR Track Register, regis¬ 
tre de piste. 

# 312 : SR Sector Register, regis¬ 
tre de secteur, 

#313: Data Register, registre de 
données. 

#314 : nom à trouver... 

Le bit 3 ne sert à rien, le bit 2 sert 
apparemment à quelque chose, 
mais je ne l'ai pas déterminé pré¬ 
cisément. 

Bit 0 : traitement de l'interrup¬ 
tion. Pas très clair là non plus... 
Bit 1 : directement relié au signal 
ROM DIS du bus : à 0, la ROM 
est inhibée. 

Bit 4 : Side Select. Directement 
relié au connecteur Shugart : 
0 = face A, 1 =face B (sans effet 
sur un lecteur simple tête). 

Bits 5, 6 : Drive Select. 

Bit 7 : en sortie : Eprom Select, 
actif à l'état bas. 

En entrée, la ligne est reliée au 
signal "INTRO" du WD 1793, et 
signale la fin d'une commande. 
La ligne est aussi connectée à 
riRQ. C'est encore la recopie du 
bit 0 du STR, soit le signal 
"READY". 

#318 : c'est la recopie du bit 1 
du STR et est reliée à la ligne 
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DRQ (Data Request) du WD. 
Une dernière remarque : compte 
tenu de débit d'un lecteur double 
densité, l'ORIC reçoit un octet 
toutes les 32 microsecondes. Il 
ne faut pas traîner... 

LES VARIABLES SYSTEMES 

Le DOS est logé en RAM Over- 
lay. ll utilise ses propres variables 
systèmes. Les seuls pointeurs en 
page zéro sont : # F3 et # F4 pour 
les RWTS. Le XL DOS utilise en 
plus la zone #F5-#F9 comme 
zone de travail, de même que la 
zone 0-#B pour le RENUM, 
DELETE. 

Pour le DOS V1.1, la gestion de 
fichier n'a pas du tout été analy¬ 
sée. 

Voici la carte mémoire : 

#0000 : numéro de lecteur. 
#0001 : numéro de piste. 
#0002 : numéro de secteur. 
#0003 : adresse du buffer de 
secteur. 

#0005 : travail RWTS. 

# 0006 : sauvegarde du pointeur 

de pile pour reprise après erreur. 
#0007 : 0 = ROM VI.0, 

1 =ROM VI.1. 

# 0008 : compteur de tentatives 
•pour RWTS. 

#0009 : idem à ci-dessus. 

# OOOA : inutilisé, positionné à 0 
par la #D427 (sauf XL DOS). 
#0008 ; 

#0000 : lecteur par défaut. 
#000D : 

# OOOE : 

# 000F : utilisé par XL DOS pour 
la gestion de fichier. 

#0010 : inutilisé sur le VI.1. 
#0011 : 

#0012 : 

#0013-16 : nombre de pistes 
pour chaque.lecteur. Si 0, lecteur 
non branché. 

# 0017-1A ; idem pour la face B 
si lecteur double face. 

#001 B-#22 : inutilisé. 

#0023-#0122 : buffer de sec¬ 
teur. 

Les octets # 0123-# 012B sont 
en fait la zone de travail sur l'en¬ 
tête de la disquette (cf. struc¬ 
ture). 


#0122 S : 

#0123 P : adresse du premier 
secteur libre. 

#0124 S : 

#0125 P ; adresse du premier 
secteur du catalogue. 

#0126-7 : nombre de secteurs 
libres, décrémenté à chaque allo¬ 
cation de secteur. 

#0128-9 : nombre de secteurs 
occupés, incrémenté à chaque 
allocation de secteur, sauf pour 
un nouveau secteur de catalo¬ 
gue. 

Les octets #012B-#0134 
contiennent le nom d'un fichier 
tel qu'il est codé par la routine 
d'acquisition d'un nom ( # D44B). 
Les wildcards dont représentées 
par des "?". De plus, les octets 
#0120-#013B contiennent le 
nom tel qu'il est codé dans le 
catalogue. 

#012B : numéro du lecteur. 
#0120-31 : 6 caractères du 
nom. 

#0132-34 : 3 caractères de l'ex¬ 
tension. 

#0135-6 : nombre de secteurs 
du fichier. 

#0137 S : 

#0138 P : adresse du premier 
secteur du fichier. 

#0139 S : 

#013A P : adresse du dernier 
secteur du fichier. 

#013B : code de protection bit, 
7 = protection en écriture, bit 6 = 
invisible. 

#0130 : inutilisé, positionné à 
#FF par #D400. 

# 013D S ; contient l'adresse du 
secteur de catalogue. 

#013E P : après une création 
(routine #D442). 

# 013F : contient la position d'un 
nom dans le secteur de catalogue 
(3, #13, #23...) après toute 
recherche, création, etc. sur le 
catalogue. 

#0140 : inutilisé. 

#0141 : compte en général le 
nombre d'octets utiles d'un 
fichier. 

#0142 : position du premier 
octet utile (utilisé par le SAVE). 
#0145-6 : résultat de l'évalua¬ 
tion d'une expression sur deux 
octets (routine #D45D). 


# 0149-A : vecteur de traitement 
des erreurs. Dans l'Eprom, 
détourné sur "no System...". 

Variables systèmes du LOAD 

Oes variables sytèmes contrôlent 
le chargement. Elles sont posi¬ 
tionnées par défaut (valeurs entre 
parenthèses) par la routine 

# D400. 

#0141 (00) si différent de zéro, 
adresse de chargement différente 
de celle prévue (option J,A). 

# 014B-C : après un chargement 
(#D409), status du fichier. 

#014D-E (00) : adresse de char¬ 
gement si différente de celle pré¬ 
vue. 

# 014F (# FF) : si bit 7 = 0, ne pas 
exécuter (option N). 

#0150 (#FF) : si bit 7 = 0, affi¬ 
cher les adresses (option D). 

Les autres variables systèmes 
dépendent de chaque routine : les 
SAVE, DEL, FORMAT, OOPY, 
BAOKUP ont leurs propres varia¬ 
bles système. 

XL DOS 

0284-02DD : variables de travail 
fichiers. 

02DE-02FD : table piste et sec¬ 
teurs (allocation de secteur). 
02FE : nombre de secteurs vali¬ 
des de la table, négatif si aucun. 
02FF ; pointeur de la table. 
0300-FFFF : DOS... 

DOS VI. 1 

D200-D3FF : tampons de travail 
fichiers. 

D400-FFFF : DOS... 

Les DOS contiennent une table 
de vecteurs qui adressent les rou¬ 
tines les plus importantes. Nous 
recommandons aux lecteurs 
d'utiliser le plus possible cette 
table, assurant ainsi la compati¬ 
bilité entre les deux DOS. 

Si l'envie vous prend de regarder 
l'Eprom, sachez que cette table 
se retrouve, mais translatée en 

# EOOO. 

Les symboles A, X, Y, P dési¬ 
gnent les registres du 6502. Z et 
C désignent les indicateurs du 
registre d'état du 6502. 

# D400 : positionne les valeurs 
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par défaut du LOAD, chargement 
normal, cf. #D409. 

#D403 RWTS : point d'entrée 
des routines de dialogue avec le 
lecteur. En entrée, X contient le 
code de commande à envoyer au 
WD 1793. Si une erreur est géné¬ 
rée, le code est mis en #4FD. Y 
et X sont conservés. 

#D406 : 

/^D409 : charger un fichier. Le 
nom du fichier est en #C12B..., 
et les variables de contrôle sont 
positionnées par #D4(X}... ou 
des valeurs personnelles. Atten¬ 
tion, le fichier n'est en aucun cas 
exécuté. Son code de type se 
retrouve en #C14B-C. 

#D40C : recherche d'un fichier 
dans le catalogue à partir du 
début. Le nom du fichier doit être 
placé en #C12B... En retour, 
X = O et Z = 1 si le fichier n'a pas 
été trouvé. Sinon, Z = 0 et X 
pointe sur le début du nom (le 
premier caractère est accessible 
par LDA$C023,X). #Cl3F prend 
la même valeur que X. 

#D40F : génère un FILE NOT 
FOUND. 

# D412 : affiche un nom de pro¬ 
gramme. Celui-ci doit se trouver 
dans le buffer, et sa position est 
repérée par #C13F. 

#D415 : équivalent à C5A2 
(1.0)/C592 (1.1) : saisie de 
caractères dans le tampon cla¬ 
vier. 

#D418 : équivalent à C5F8 
(1.0)/C5E8 (1.1) : saisie d'un 
caractère au clavier. 

# D41B : gestion des erreurs. En 
arrivant, X contient le numéro de 
l'erreur (0 à ...). Il est incrémenté 
puis sauvé en #4FF. Ensuite, la 
routine continue par un saut indi¬ 
rect en #C149. Si les erreurs 
sont inhibées, on sort par 

# D469, sinon on affiche le mes¬ 
sage. Le vecteur # C149 est posi¬ 
tionné par l'interpréteur. 

# D41E saute sur... un RTS. Inté¬ 
rêt restreint I 

# D421 : écriture d'un secteur, si 
le lecteur, la piste et le secteur 
précisés par #C(X)0-1-2. Les 
données (256) seront prises à 
l'adresse contenue en # C003-4. 
Attention, un FDERR= ou un 
Write Protected peut être généré. 
Y et X sont conservés. 


#D424 : idem à #D421 mais 
pour la lecture. 

#D427 : positionne #C003-4 
sur tt C023 et charge le secteur 
1 piste 0. 

#D42A teste si le lecteur 
contenu en it COOO est en ligne 
(à l'aide de la table /(COI3), et 
génère un message sinon. 

# D42D : affiche la chaîne poin¬ 
tée par # OC-D et terminée par un 
Null (00). 

If D430 : cherche un nom à par¬ 
tir de la position courante. En arri¬ 
vant, le buffer doit contenir le 
secteur de catalogue courant et 
X la position du nom courant. 
Sortie : cf. #D40C. 

#D433 : charge l'en-tête (en 
#C123-#C12A), via #427. 
#D436 : écrit l'en-tête (lit par 
#D427, transfert de 
#C123-#C12A) et réécriture). 
#439 : transfère le nom 
(#C12C-C13B) dans le catalo¬ 
gue, selon les "coordonnées" 
données par #C13D-E-F. 
#D43C : crée un nouveau sec¬ 
teur. Le nombre de secteurs 
occupés est incrémenté, celui 
des libres est décrémenté. 
#C001-2 contient l'adresse du 
secteur créé et #C023-4 
contient le prochain secteur libre. 
Si le disque est plein, Z=1 en 
sortie. 

Attention ! Il faut avoir chargé 
l'en-tête ( # D436) et faire impé¬ 
rativement un # D47E pour initia¬ 
liser le pointeur de secteurs libres. 
Se rappeler aussi que #D40C 
recharge l'en-tête, donc ne pas 
oublier de le sauvegarder si on y 
a touché. 

#D43F : idem à #D43C, mais 
n'incrémente pas le nombre de 
secteurs occupés. Utilisé par 

# D442. 

# D442 : recherche une place 
dans le catalogue et positionne 
en conséquence #C13D-E-F. Si 
Z = 1, la disquette est pleine, et 
il n'a pas été possible de créer un 
nouveau secteur pour le catalo¬ 
gue. 

# D445 : trouver un fichier à par¬ 
tir des coordonnées : #C001-2 
et # Cl 3F. Mêmes conditions de 
sortie que pour #D40C. 

# D448 : jamais appelé, sauf par 
l'Eprom : positionne la table des 


lecteurs (#C013-...). 

#D44B : évalue un nom et le 
place en #C12B. 

# D44E : teste la validité du 
caractère dont le code est dans 
A. En retour, A = 0 si ce n'est pas 
un chiffre ou une lettre. 

#D451 : transfère un nom du 
catalogue ( # C023 et pointé par 
#C13F) vers le tampon 
(#C12C...). 

#D454 : aller à la ligne. 

# D457 : afficher le caractère 
dont le code est dans A. 

# D45A : exécuter une routine de 
la ROM. Pour l'utiliser, il faut pla¬ 
cer après le JSR #D45A les 
adresses des routines 1.0 puis 
1.1. Ne jamais utiliser JMP. 
Exemple : 

4000 JSR # D45A 
4003 : A2 C5 92 C5 
4007 RTS 

# D45D : évaluer une expression 
entière et la mettre dans 
#Cl45-6. Sur le VI .1, n'accepte 
pas les variables (III). Sortie : 
C = 0 si caractères invalides 
(Syntax Error). 

# D460 : prendre caractère cou¬ 
rant en sautant les espaces. 
Attention : le caractère est pointé 
par Y. Vos routines ne devront 
pas y toucher, sous peine de 
générer des "Syntax Error". Il 
aurait été si simple de se servir de 
#00E8 et #00E2 I 

# D463 : retour Basic (équivalent 
à un JMP #C003). 

# D466 : saut à l'interpréteur du 
DOS. 

# D469 : retour Basic en se pla¬ 
çant sur l'instruction suivante et 
en remettant le pointeur de pile 
sauvé en #C009. 

# D46C : interdire les Wildcards. 
#D46F : prendre le caractère 
courant. Z = 1 si fin d'instruction. 
#D472 : curseur ON. 

#D475 : curseur OFF. 

# D47E : initialisation du pointeur 
de secteur libre. Indispensable 
avant toute sauvegarde (une 
seule fois suffit I). 

#D487 : sous-programme de 
l'acquisition d'un nom. 

Si un LOAD est très facile à faire, 
un SAVE est plus compliqué car 
la routine est moins structurée. 
Le mieux à faire est de désassem- 
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bler pour utiliser en partie cette 
routine (adresse #E3FE). 

Autre routine très utile : le DIR. 
La première chose à faire est de 
détourner # D469 sur un RTS 
pour que l'on sorte correctement 
(en effet, les routines du DOS se 
terminent par un JMP # D469 et 
non par un RTS). Il suffit ensuite 
de mettre le nom en #C12B 
comme d'habitude et de faire un 
JMP (ou un JSR) en # El EO, ceci 
pour les deux DOS. 

Pour utiliser le DEL, même 
méthode : détourner #D469, 
mettre le nom en #C12B puis 
faire un saut en # EA5B, quel que 
soit le DOS. 

Quelques routines intéressantes 
(compatibles pour les deux DOS) 

# D591 : affiche le contenu de A 


en hexadécimal. 

Le passage sur la RAM se fait 
par : 

LDA #$00 
JSR #04E6 

Le passage sur la ROM se fait 
par : 

LDA #$02 
JSR #04E6 

Attention dans les deux cas, 
#4E6 effectue un SEI. 

Il a été prévu sur le XL DOS 
d'étendre sans limite son vocabu¬ 
laire, et ce sans l'affreux "!". Il 
vous faudra écrire une routine qui 
analyse la syntaxe. Vos'mots- 
clés ne devront pas commencer 
par des mots-clés Basic. Votre 
routine devra retourner par un 
RTS et sans avoir touché à 
# E9-A si votre mot-clé n'est pas 
reconnu, ou sortir par un JMP 
#430 après l'exécution de votre 


routine. Pour connecter votre 
routine, vous devrez faire ; 
#436 : JSR Routine 
#439 JSR #404 
Exemple : vous voulez taper sim¬ 
plement " " pour retourner à 
Oricmon : 

A780 LDY # $00 
A782 LDA ($E9), Y 
A784 OMP #" " 

A786 BEQ $A800 
A788 RTS 
0436 JSR $A780 
0439 JSR $0404 


RÉPÉTITION RAPIDE 


Bernard TOURNIE 


I l arrive souvent que l'on ait 
besoin d'amener rapidement le 
curseur en un point quelconque 
de l'écran. Par exemple, 
lorsqu'on met au point un pro¬ 
gramme et que l'on veut corriger, 
à l'aide du CTRL A une ligne 
BASIC placée au sommet de 
l'écran. 

C'est dans ces moments d'impa¬ 
tience que l'on compare le cur¬ 
seur à un escargot. 

En effet, lors de l'appui prolongé 
sur une touche, il est nécessaire 
d'attendre une seconde pour que 
la répétition automatique s'en¬ 


clenche. Ce délai passant à 
0,125 s ensuite. 

Pour augmenter considérable¬ 
ment cette vitesse, il suffit de 
diminuer la valeur (codée sur 16 
bits) contenue en # 306 et 
#307. 

Celle-ci est, au départ, #2710. 
Le seul impératif à respecter est 
de ne pas amener cette valeur en- 
dessous de # 960 car l'ORIC ris¬ 
querait d'en être perturbé... (la 
vitesse de répétition étant inver¬ 
sement proportionnelle à celle du 
CPU I). 

Ce petit programme en langage 


machine vous permettra d'utiliser 
CTRL V en "toggle" (bascule) ; 
en d'autrès termes, un premier 
appui sur CTRL V vous fera pas¬ 
ser en vitesse de répétition supé¬ 
rieure, en même temps que le 
caractère "V" apparaîtra en 
jaune, en haut de l'écran. Un 
second appui vous fera revenir à 
la vitesse normale. 

Vous pourrez ainsi faire vos cor¬ 
rections avec beaucoup plus de 
souplesse et de rapidité. 

Le listing du programme est 
donné en Assembleur symboli¬ 
que (figure 1). 
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MODE D'EMPLOI 
POUR CHARGER VITREP 

Premièrement : 

— si vous possédez un ORIC-1, 
tapez le programme de la figure 
2 , 

— si vous avez un ATMOS, rem¬ 
placez les lignes 110, 120, 130 


du programme de la figure 2 par 
celles de la figure 3. 

Deuxièmement : 

— tapez RETURN et préparez une 
cassette pour enregistrer VITREP. 
Un fois prêt, appuyez sur n'im¬ 
porte quelle touche. Le pro¬ 
gramme BASIC effectue alors un 
CSAVE "VITREP". 


Pour vérifier son bon fonctionne¬ 
ment, il ne vous reste plus qu'à 
le charger par un CLOAD. 

Si l'ATMOS vous renvoie le mes¬ 
sage "Errors found", tapez CALL 
#9700 pour lancer VITREP. 

ATTENTION : Souvenez-vous 
que vous devez charger VITREP 
avant tout autre programme. 


0 

9700 



;-VITREP 

— 



1 

9700 







2 

9700 



{Auteur : B 

Tournie 


3 

9700 



;D«te t30 

Mars 

1985 

4 

9700 







5 

9700 







6 

9700 







7 

9700 



ORG «9700 




8 

9700 







9 

9700 







10 

9700 



1 Def. Adreee. 



11 

9700 







12 

9700 







13 

9700 


CARACT 

EQU «02DF 




14 

9700 


VIATIL 

EQU *0306 




15 

9700 


VIATIH 

EQU *0307 




16 

9700 


IRQL 

EQU *0231 

,ATMOS 

-> 

*024B 

17 

9700 


IRQH 

EQU *0232 

,ATMOS 

-> 

*0240 

18 

9700 


J MP 

EQU *0230 

,ATMOS 

-> 

*e24A 

19 

9700 


ADECRl 

EQU *BBA0 




20 

9700 


ADECR2 

EQU *BBA1 




21 

9700 


MODVIS 

EQU *02C0 




22 

9700 


CTRLV 

EQU *16 




23 

9700 


FINPRL 

EQU *9C 




24 

9700 


FINPRH 

EQU *9D 




25 

9700 







26 

9700 


LOW 

EQL DEBUT 




27 

9700 


HIGH 

EQH DEBUT 




28 

9700 







29 

9700 







30 

9700 



1 Début 




31 

9700 







32 

9700 







33 

9700 



1 Ini t mem. 




34 

9700 







35 

9700 

48 


PHA 




36 

9701 

A903 


LDA tt*03' 




37 

9703 

859C 


STA FINPRL 




38 

9705 

A905 


LDA «*05 




39 

9707 

B59D 


STA FINPRH 




40 

9709 







41 

9709 



1 Init RTI 




42 

9709 







43 

9709 

A91A 


LDA «LOW 




44 

970B 

883102 


STA IRQL. 




45 

970E 

A997 


LDA «HIGH 




46 

9710 

883202 


STA IRQH. 




47 

9713 

A94C 


LDA »*4C 




48 

9715 

BD30B2 


STA JMP. 




49 

9718 

68 


PLA 




50 

9719 

60 


RTS 




51 

971A 







52 

971A 







53 

971A 



{Test clavier 



54 

971A 







55 

971A 

48 

DEBUT 

PHA 




56 

971B 

ADDFe2 


LDA CARACT. 




57 

971E 

1037 


BPL FIN 




58 

9720 

297F 


AND **7F 




59 

9722 

C916 


CMP «CTRLV 




60 

9724 

D031 


BNE FIN 




61 

9726 







62 

9726 



{Vitesse repet. 



63 

9726 







64 

9726 

AD0703 


LDA VIATIH. 




65 

9729 

C927 


CMP «*27 





66 

972B 

D019 


BNE 

REINIT 

67 

972D 

A90C 


LOA 

«*0C 

68 

972F 

800703 


STA 

VIATIH. 

69 

9732 





70 

9732 



{Mode TEXT ? 

71 

9732 





72 

9732 

ADC002 


LDA 

MODVIS. 

73 

9735 

2901 


AND 

«*01 

74 

9737 

DeiE 


BNE 

FIN 

75 

9739 





76 

9739 



iSi 

oui 

77 

9739 



{affichage de V 

78 

9739 





79 

9739 

A903 


LDA 

«*03 

80 

973B 

8DA0BB 


STA 

ADECRl. 

81 

973E 

A956 


LDA 

«*56 

82 

9740 

BDAIBB 


STA 

ADECR2. 

83 

9743 

4C5797’ 


JMP 

FIN 

84 

9746 





85 

9746 

A927 

REINIT 

LDA 

«*27 

86 

9748 

BD0703 


STA 

VIATIH. 

87 

974B 

ADC0e2 


LDA 

MODVIS. 

88 

974E 

2901 


AND 

«*01 

89 

9750 

D005 


BNE 

FIN 

90 

9752 

A920 


LDA 

«*20 

91 

9754 

BDAIBB 


STA 

ADECR2. 

92 

9757 





93 

9757 

68 

FIN 

PLA 


94 

9758 

40 


RTI 


IMPLANTATION : *9700 A 

*9759 


Figure l 


S CLSiAD>«97ea 

10 READ D»i IF D»-’’FF" THEN 30 
20 D-VAL("#"+DS>iPOKE AD,DlAD-AD+1iGOTO 10 
30 PRINT“CASSETTE PRETE 7"lGET A» 

40 CSAVE"VITREP",A«9700,E#9759,AUTO 
50 NEW 

100 DATA 48,A9,03,B5,9C,A9,05 
110 DATA 8S,9D,A9,1A,8D,31,02 
120 DATA A9,97,8D,32,02,A9,4C 
130 DATA 8D,30,02,68,60,48,AD 
140 DATA DF,02,10,37,29,7F,C9 
150 DATA 16,D0,31,AD,07,03,C9 
160 DATA 27,D0,19,A9,0C,8D,07 
170 DATA 03,AD,00,02,29,01,D0 
180 DATA lE,A9,03,8D,Ae,BB,A9 
190 DATA 56,8D,A1,BB,4C,57,97 
200 DATA A9,27,8D,07,03,AD,C0 
210 DATA 02,29,01,D0,05,A9,20 
220 DATA BD,Al,BB,68,40,FF 

Figure 2 


110 DATA B5,9D,A9,1A,8D,4B,02 
120 DATA A9,97,8D,4C,e2,A9,4C 
130 DATA 8D,4A,02,68,60,4B,AD 


Figure 3 
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DISQUETTES DE THEORIC 


Pour éviter toutes confusions et 
toutes réclamations ultérieures 
(que nous n'accepterons pas), il 
est précisé que les disquettes 
fournies contiennent les program¬ 
mes tels qu'ils sont publiés dans 
THEORIC... 


Ils ne sont ni adaptés aux besoins 
du Jasmin, ni transformés 
ORIC-1 ou ATMOS... Ce travail 
reste à vos soins. 

Seuls les logiciels dont la version 
"compatible" a été publiée dans 
THEORIC sont livrés en deux ver¬ 


sions, ORIC-1 et ATMOS sur la 
disquette. 

Voici le contenu des disquettes 
n° 1 (THEORIC n° 4 et 5) et n° 2 
(THEORIC n° 6 et 7). 


VOLUHE : THE04-5 


U 

A .SYS 

S 

62 SECTORS 

U 

A .BAS 

S 

4 SECTORS 

U 

CALCHENT.BAS 

S 

14 SECTORS 

U 

DRAPEAUX.BAS 

S 

42 SECTORS 

U 

SYNTHETI.BAS 

S 

50 SECTORS 

U 

COURBES .BAS 

S 

88 SECTORS 

U 

VISIORIC.BAS 

S 

33 SECTORS 

U 

DESCENTE.BAS 

c 

9 SECTORS 

U 

ENVELOPP.BAS 

s 

16 SECTORS 

U 

TRANSFER.BAS 

S 

3 SECTORS 

U 

SCATAT .BIN 

s 

3 SECTORS 

U 

SCATOl .BIN 

s 

3 SECTORS 

U 

HIRES50 .BIN 

s 

2 SECTORS 

366 SECTORS FREE 



VOLUHE : THE06-7 


U 

A-SYS .SYS 

s 

62 SECTORS 

U 

A .BAS 

s 

4 SECTORS 

ü 

RENHDETR.BIN 

s 

6 SECTORS 

U 

RENMDETR.BAS 

s 

17 SECTORS 

U 

ANADIS .BAS 

s 

9 SECTORS 

U 

PENDULE .BAS 

s 

7 SECTORS 

U 

HRSHCP40.BAS 

s 

6 SECTORS 

U 

TSTA2IAT.BIN 

s 

2 SECTORS 

U 

TSTA2I01.BIN 

s 

2 SECTORS 

U 

CONVEHEX.BIN 

s 

2 SECTORS 

U 

LITSEC .BAS 

s 

10 SECTORS 

U 

EDITECAR.BAS 

s 

11 SECTORS 

U 

HASTERHI.BAS 

s 

18 SECTORS 

U 

TESTBLUR.BAS 

s 

3 SECTORS 

U 

BLURKS .BAS 

s 

20 SECTORS 

U 

BLURKSl .BAS 

s 

34 SECTORS 

U 

CATALAT2.BIN 

s 

2 SECTORS 

U 

CATAL012.BIN 

s 

2 SECTORS 

U 

VOICEAT .BIN 

s 

3 SECTORS 

U 

VOICE .BAS 

s 

2 SECTORS 

U 

BONJOUR .BAS 

s 

2 SECTORS 

U 

PARLE .BAS 

s 

2 SECTORS 

U 

AUTOVERF.BAS 

s 

7 SECTORS 

U 

PAR0LES2.BIN 

s 

31 SECTORS 

U 

VOICEOl .BIN 

s 

3 SECTORS 


428 SECTORS FREE 



— Gère simultanément 10 comptes (bancaires, postaux, 
Codévi, etc...). Divisés chacun en 30 postes d'affec¬ 
tation. 


— Fournit des statistiques sur l'ensemble des comptes et 
postes: dépenses, revenus, etc... et permet une véri¬ 
table gestion prévisionnelle. 

— Traite les prélèvements automatiques. 

— Gère la trésorerie des cartes de crédit. 

— Vérifie' les relevés de comptes et mémorise vos écri¬ 
tures. 

— Suit l'évolution de vos placements. 


ENVOYEZ CE BON OE COMMANDE ET VOTRE REGLEMENT AlOGYS: BUREAU 
O'ETUOES INFORMATIQUES. 3 RUE FERDINAND BUISSON 92110 CLICHY. 

Je désire recevoir : 

□ La version cassette ORIC-1 - ATMOS de Gestion 
Domestique (2 cassettes) au prix de 270 F. 

□ La disquette ORIC-1 - ATMOS "version JASMIN 
(T.R.A.N.)" au prix do 320 F. 


□ La disquette ORIC-1 - ATMOS de Gestion domestique 
au prix de 290 F. 

Ci-joint mon règlement par chèque bancaire ou postal. 


LOGYS 

tffiudn 

l'ir f Buvvvt 

1?II0aCHt 


u: 



Ui 
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JASMIN 


VISITE A 


U n an après notre premier 
interview de Monsieur TRAN, 
nous avons pris contact avec la 
société. Monsieur ROUSSEAU, 
co-diracteur, a accepté de nous 
recevoir. 

Q.: Monsieur ROUSSEAU, où en 
est le lecteur Jasmin ? 

R.: Le lecteur Jasmin qui a eu le 
succès — mérité — que l'on can¬ 
nait, se compose d'un lecteur une 
tête placé dans un boîtier et du 
contrôleur et de l'alimentation 
placés dans un second boîtier. Ce 
dernier permet d'alimenter le 
micro-ordinateur et, éventuelle¬ 
ment, un second lecteur (ce que 
nous appelons alors un ensemble 
DUO). 

Cependant, dans beaucoup d'ap¬ 
plications, la capacité, pourtant 
confortable (environ 200 k- 
octe ts), s'a vère insuffisan te. 
Aussi venons-nous de lancer Jas¬ 
min 2, équipé d'un lecteur dou¬ 
ble tête et qui a évidemment une 
capacité double puisque le lecteur 
est capable de lire une disquette 
sur ses deux faces sans que l'on 
ait à la retourner, et ceci pour un 
prix sensiblement équivalent é 
Jasmin I 

Nous en avons profité pour chan¬ 
ger le design et améliorer l'envi¬ 
ronnement thermique du lecteur, 
ainsi que sa solidité mécanique. 
Désormais, lecteur et contrôleur 
sont dans le même boîtier, aux 
proportions identiques à Jasmin, 
et l'ensemble transformateur- 
redresseur-fusible se trouve sur la 
prise de courante. Dans le cas du 
DUO — près d'un méga-octet en 
ligne — U faut rajouter un 
deuxième lecteur, connecté au 
précédent par un câble plat, véhi¬ 
culant aussi l'alimentation. 

Le DOS, désormais unique 
ORIC-1/ATMOS, est accompa¬ 
gné d'une nouvelle notice. Une 
nouvelle instruction permet de 


LA SOCIÉTÉ TRAN 


détruire sur la disquette le DOS 
inutile et de récupérer ainsi son 
emplacement. Cet appareil est 
appelé à remplacer progressive¬ 
ment le lecteur une tête. Ceci est 
la rançon du progrès : la course 
aux grosses capacités est enta¬ 
mée. 

H subsiste un stock de lecteurs 
simple tête, qui sera éventuelle¬ 
ment renouvelé en fonction des 
demandes de la clientèle. Signa¬ 
lons que les logiciels que nous 
diffusons sont compatibles avec 
les deux versions. De même, le 
service après vente sera assuré 
dans tous les cas. 

Q. : Le SAV ? Parlons-en, car cer¬ 
tains possesseurs de Jasmin se 
plaignent de sa lenteur. 

R. : C'est un problème toujours 
difficile à résoudre, car H y a des 
"vagues" de réparation, toujours 
imprévisibles. Les délais peuvent 
varier entre,,3 jours et 3 semai¬ 
nes, sans tenir compte des délais 
postaux qui, comme vous l'avez 
sans doute remarqué vous- 
même, sont eux aussi imprévisi¬ 
bles... 

Pour Jasmin 2, c'est la firme, 
DA TTEL, qui fabrique cet appa¬ 
reil, qui se chargera dans un pre¬ 
mier temps du SA V. Nous y par¬ 
ticiperons sans doute également. 

Q. : Qui fabrique Jasmin 2 ? 

R. : Nous avons changé récem¬ 
ment de fabricant. Jusqu'à fin 
84, Jasmin était construit au Por¬ 
tugal, par la firme TIMEX. Celle- 
ci réalise également certains 
micro-ordinateurs de la marque 
SINCLAIR. Ce choix avait été fait 
car nous n'avions pas trouvé en 
France d'industriels susceptibles 
de réaliser 1000 lecteurs par 
mois. H y avait Un peu de mépris 
dans cette attitude : comment 
une petite SARL au capital de 
20 000 F, avait-elle la prétention 
de vendre 12 (XX) lecteurs de dis¬ 


quettes par an ? D'autre part, 
nous entrons en concurrence 
avec la firme puissante ORIC, qui 
était elle-même sur le point de 
commercialiser son propre appa¬ 
reil. Nous remercions donc vive¬ 
ment la firme TIMEX de nous 
avoir fait confiance. Avec la 
croissance de notre société, les 
problèmes d'éloignement sont 
devenus insurmontables. Ainsi 
avons-nous pris contact avec la 
société DATTEL à Aix-en-Pro¬ 
vence pour fabriquer Jasmin 2. 

Q. : Parlons de la gamme de logi¬ 
ciels : certains, qui sont annon¬ 
cés dans les publicités, sont, 
parait-il, indisponibles. Qu'en est- 
il ? 

R. : Là encore, ily a un problème. 
Nos concepteurs de logiciels sont 
des personnes indépendantes. 
Elles nous proposent des pro¬ 
grammes qui, si nous les jugeons 
de qualité, sont aussitôt prévus 
pour la commercialisation, dans 
l'intérêt même de nos dents. 
Mais H arrive que certains de nos 
auteurs abandonnent, et c'est la 
catastrophe pour nous / 

D'autre part, la phase finale de 
mise au point est toujours la plus 
longue. La commercialisation elle- 
même demande un certain 
temps : impression de la 
jaquette, de la notice... Mais, à 
l'heure actuelle, tous les logiciels 
annoncés sont disponibles (Easy- 
text. Assembleur, Logo, Multifi- 
ches, etc.). 

Q. : Un dernier point à propos de 
vos publicités. Je trouve toujours 
choquant que les frais de port 
soient forfaitaires (40 F), que l'on 
commande un lecteur de disquet¬ 
tes ou un livre comme "Le TDOS 
et ses fichiers". Qu'en pensez- 
vous ? 

R. : C'est exact, mais certains de 
nos clients réduisent spontané¬ 
ment les frais de port dans un tel 
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cas et nous trouvons cela justi¬ 
fié / Nous n'avons jamais refusé 
une expédition dans de telles cir¬ 
constances. A propos du livre 
que vous avez cité, H serait inté¬ 
ressant que vos lecteurs — qui 
hésiteraient à acheter un 
lecteur — le consultent aupara¬ 
vant afin de mieux connaître les 


possibilités du TDOS et se déci¬ 
der en toute connaissance de 
cause. 

Q. : Un dernier point : Quelles 
sont les perspectives d'avenir de 
votre société ? 

R. : Nous allons persévérer dans 
la conception de périphériques, 
type mémoire de masse. Nous 


avons créé dans cette intention 
un bureau d'études de 6 ingé¬ 
nieurs, sous la conduite de Mon¬ 
sieur TRAN. Nous espérons pré¬ 
senter de nouveaux produits au 
SICOB. 

Monsieur ROUSSEAU, nous vous 
remercions. 


MODIFIER LE T-DOS 


Guy HERMANN 


D ans notre numéro 6, nous 
proposions une modification 
du T-DOS visant à supprimer la 
temporisation lors de l'apparition 
du "logo" de TRAN. Voici une 
routine qui vous permettra d'exé¬ 
cuter la modification en question, 
ainsi que quelques autres. 

Ce programme, écrit en langage 
machine, apporte les améliora¬ 
tions suivantes : 

— suppression du "logo" TRAN, 
— passage automatique, au 
BOOTING, en papier noir encre 
blanche (ces couleurs sont modi¬ 
fiables), 

— le poussoir RESET de l'ORIC 
ne change plus les couleurs de 
fond et d'encre. 

Le programme est logé entre F(X) 
et FB3 (quelle que soit sa version, 
ORIC-1 ou ATMOS). 

Pour l'utiliser : "Booter" le T- 
DOS. 

Charger la routine en langage 
machine, à partir de la cassette 
ou de la disquette où elle se 
trouve. 

Faire CALL # FOO. 

Mettre en place une disquette ini¬ 
tialisée, sur laquelle se rangera le 
nouveau T-DOS. 

Faire IMASTER "T DOS". 

Pour vérifier que tout fonctionne, 
faire RESET sur le Jasmin, puis 
BOOT. 

Comment ça marche ? 

Il transfère le T-DOS à partir de 
l'adresse # 10(X), opère les modi¬ 


fications, puis place le "nouveau 
T-DOS" en RAM Overlay. 

Le premier programme, en # 2567 
(#D567 Overlay) se charge de 
changer les couleurs et déroute 
le RESET ORIC vers un RESET 
sans modification des couleurs. 
Le second programme (il y a deux 
programmes dans la même rou¬ 
tine), en # 36D0 ( # E6D0 Over¬ 
lay) et un nouveau RESET, sans 
chargement des couleurs. 
L'utilisateur peut choisir les cou¬ 


leurs encre et fond. Pour cela, 
charger la routine et avant le 
CALL # FOO, faire : 

POKE #F71, "couleur de l'encre" 
POKE #F76, "couleur du papier". 
Attention I Couleur du papier 
égale à couleur voulue plus 16. 
Pour saisir le programme, vous 
utiliserez votre moniteur favori ou 
le Basic avec la classique boucle 
FOR-NEXT dont vous connaissez 
le principe puisque vous lisez 
THEORIC ! 


ICÙ .=t^^)i=»?û0T0»FB5;RErtû!K 
::û 0 RE.'i ^raSiON ATKOS 
ICIO DATA 75,.A9,7r,8D,0E,03 
1020 DATA 00,84,OC,64,02,B1 
1030 DATA BD,6F,ûr,^D,b6,25 
1040 DATA A?,D0,3D,67,3c,A9 
1050 DATA 84,02,51,00,91,02 
lûbO DATA SD,0 l,03,5S,oC,C0 
1070 DATA 6B.ü2,A9,D0,8D,43 
1080 DATA 55,55,55,00,20,AA 
1C90 DATA CC,C2.2û,C9,F9,A2 


l=VALC#‘+in;POKEN,I:NElîT 

,A9,01,3D,FA,03,A9,10,85,01,A9,CO,85,Û3,AO 
,02.91,üû,C8,DC>,F9,E6,C1,E6,03,D0,F3,.A2,17 
,CA,Cû,F7,A2,23,BD,3F,0F,9D,CF,36,CA,D0,F7 
,04,8D,38,3o,A9,1Û,85,01,A9,C0,85,03,84,00 
,C8,DC',F9,Eo,01 ,E6,03,DO,F3,8C,FA,03,A9,CO 
,55,55,55,55,55,55,A9,07,8C,6C,02,A9,I0,8D 
,02„A9,04,8D,49,02,40,83,05,55,55,55,55,55 
,F9,A9,07,A2,4û,2C,90,F5,2C,E0,ED,A9,FF,8D 
,C5,20,82,F9,2C,16,F8,20,5A,F7,4C,71,C4,55 


1C û F0«N=*FûûT0iFB3:READI $ : I=VAL(* #‘» î » » :POKEN,I :NEXT 


lûûC Ri 


'/E.RS:0N ORlC-1 


iClO DATA 73,A9,7F,SD,0E, 
1020 D.A7A 00,84,00,34,02, 
1C30 data BD,bF,0F,9C,66, 
1&43 ZrtTA .A9,DO,SD,37,36, 


03,A9,0l 
B1,32,91 
25,CA,D0 
A9,04,3Û 

1C30 DATA 84,02,B1,00,91,02,C8,DO 
iCcÛ DATA BD,ûE,03,53,60, 

1C70 DATA 6ê.02,A9,DC,8C,2C,02,A9 
1080 DATA 55,55,55,00,2:,6Û,F9,A9 
1090 DATA 0D,C-2,2C,:F.F9,A2,05.20 


,8D,FA, 
, 00, C8, 
,F7,A2, 
,88,36, 
,F9,£6, 

y J.}UWI 

,04,8D, 
,Û7,A2, 
,3E.F9, 


03,A9,10 
Dû,F9,E6 
23,BD,8F 
A9,10,85 
Cl,E6,03 
55,55,A9 
2C.C2,4G 
40,20,35 
2û,£0.F7 


,85,01, 
,01,E6, 
,0F,9D, 
,C1,A9, 
,D0,F3, 
,07,SD, 
,33,05, 
,F5,2C, 
,20,29, 


A9,CO,85,03,AO 
03,D0,F3,A2,17 
CF,36,CA,DO,F7 
CO,85,03,84,00 
3C,FA,03,A9,C0 
6C,02,A9,10,8D 
55,55,55,55,55 
D0,EE,A9,FF,8D 
F7,4C,03,C0,55 
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FOCTUMnON 



O RIC trouve sa place dans une 
PME. La preuve, si vous en 
doutez, vous est fournie sous la 
forme de ce logiciel de facturation 
développé sur ATMOS. 

MATERIEL 

Ce logiciel a été étudié sur l'im¬ 
primante GP-lOOA et rORIC 
ATMOS. Pour ceux qui possè¬ 
dent un autre matériel, il est pos¬ 
sible qu'ils aient à modifier le pro¬ 
gramme. Pour sauvegarder les 
différentes factures, j'utilise les 
instructions STORE et RECALL 
qui n'existent pas sur l'ORIC-l. 
Les utilisateurs d'ORIC-1 
devront, soit trouver un moyen 
pour sauvegarder les tableaux sur 
cassette, soit laisser leur ORIC-1 
branché, ou bien ils n'auront pas 
un double de leurs factures sur 
cassette. 

THEME 

Le programme peut réaliser la plu¬ 


part des factures qui sont, en 
général, de 3 types différents 
(type 1 : date-prix ; type 2 : arti¬ 
cles toutes taxes -i- TVA ; type 
3 : articles hors taxes dont TVA). 
Il peut gérer 360 clients (9 x 40 
clients) de 9 genres de factures 
différentes qui peuvent avoir des 
articles différents et des remises 
différentes (s'ils n'ont pas de 
remise, la facture n'évoque 
aucune notion de remise). Si vous 
avez des clients réguliers, il vous 
suffira d'indiquer le numéro de 
votre client et les éléments de la 
facture qui sont modifiés. L'ordi¬ 
nateur connaît tous vos clients, 
le prix de chacun de vos articles, 
la remise et le genre de facture 
qui est adaptée à chacun de vos 
clients et ainsi effectue tous les 
calculs nécessaires pour imprimer 
vos factures. 

MISE EN ROUTE 
DU LOGICIEL 

Après avoir écrit le listing et 


l'avoir enregistré, écrivez RUN 
[RETURN] pour mettre l'ordina¬ 
teur en marche. Ensuite, tout 
vous sera indiqué. Quand vous 
aurez le menu qui donne ,10 
options, de 0 à 9, prenez l'option 
9 qui vous permet d'indiquer le 
corps de chacune de vos factu¬ 
res (cf. l'exemple ci-après). Une 
fois que vous aurez entré le corps 
des factures, la TVA, l'adresse, 
la remise de chacun de vos 
clients, et sauvegardé ces don¬ 
nées fondamentales (option 3 du 
menu), votre logiciel sera prêt à 
fonctionner. Ainsi, il vous suffira 
d'entrer la date, les différentes 
données nécessaires pour effec¬ 
tuer vos factures et de presser 
l'option "Facturation" pour que 
l'ordinateur effectue vos factu¬ 
res. Grâce à l'option "Total", il 
vous est possible de savoir 
combien vous doivent vos clients 
avec le détail de chacun des élé¬ 
ments de la facture, et de connaî¬ 
tre le total de vos gains. 
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EXEMPLE 


Presses ldi. to'i.cli-: ViJ 
Pressez \3. touclic l'IJ 
écrivez^ VMÜL S.R.R.L. CRETURHa 
Pressez C23 

écri vez •• I nfor- r.i d i i • l l-kETLU-:! JJ 

Pressez C3J 

ecrivez= ÿ rue Le*, •.".u l>e CRL. 1 UMfJ,ï 

Pr C4J 

écrivez- 75Ù15 PARIS LRETURMI 
pressez CfiJ 

écrivez- Tel • 1 .'626.26.ïîjl-’iJ I 
Pressez lé. t.ou.rhe C?3. 
écrivez: RGB 3254 w2ü7j tP-iPHii.::iPi 
Pressez l.y.l 

cJjfis l-î fubri'lu.s "L'orii iV!!" i-ii;* • i t !t: '*.".r.-;e"t' •'i i .fi''Je 'Je 1" i 
et C J e’ïi t sce *.Je "entetis 
Pressez CREfURUI 
écr i‘..ez 22 r.RP I l..llii-J:i 
P r-es se Z 13. J 

de fiiênie eu fs'.e de "entéte-5" >!•r•essez i J-'E i iJi- i ! i 
écri'vez' 23 IR'ETlJîvM J 
pressez t8J 

de f'iefie 'Js.ris I y. ruPri'iu»: fVPt'' eii t j.ce d-;. "eutcte l"- 

Pressez CRf'TURNl 

écrivez: 30 tRErUIdU 

Presse? Iz t-riuùhe [vj 

Pressez le J ':'U.<:lie L*:* i 

écriv/ez: Vente de Micro~OrdiïKd.i:t:i'r s i;». -it -ijcie Is 
Pressez. LtU 
Pressez 118 J 

écr 1 vez : 1 0 .6 I.Rf I i >l-.i î l 

Pressez C7'J 

pressez eu 

écr 1 vez = 23 CR£i iJid-J:i 

é'zrivez : . iti I RE. I iJldJI 

Pr essez t0J 

Pressez L6J 

Pressez Ll’l 

écrivez: 23 CRETURfJJ 

pressez Cl.J 

écr -1 vez Ji ARlHU Gu.y tl-’ÊrUEdiJ 
Pressez l2J 

écrivez: 23 ru.e Gt. LAurent CRETURIJJ 


Pressez 

r33 


écrives 

: 284Ü0 iJi.JG!:in •l.l: -kij.lRiiU IkCi 

: ii-1 1 i 

SI vous 

Avez Un .-uj. tr e !. i. euti 4 i nscf 

1 1* .* r* 1 '*z' £ 'î C it’ L •’I * 1. 1 i*,i 

Pressez 

la touche l.uJ 


Pressez 

Ia tou'She Cl J 


Pressez 

tu 


écrivez : 

: 18 ï Rt. f l l^•r J:ï 


pressés 

C2a 


écrivez■ 

■i A.nv i er CRt;! l UkHJ 


Presser 

tSJ 


é*::r-iv/ez : 

1385 CREfUld'IJ 


Pr'-essez 

r.iti 


pressez 

t2J 
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fre=SKZ 

lljj 

Pressez 

l 3. "t *c:' l tr J 

Pressez 

1.3. tou.cfie LU 

écr 1 vez, '• 

2j! LkRfüMf l 

€ Cf1 ve Z• 

111123 CkETUIi'IO 

Pressez 

la touche LU 

écr i vez ■ 

• ti LRÊ mivH J 

P fessez 

L3-I 

écrivez ^ 

: ükii.': riTM'is ‘ Ver Hiovi 2;' 

pressez 

la touche L23 

écrivez ^ 

i LREriJLdl.1 

Pressez 

la toucLie 1. 1 1 

écrivez = 

1 LRF.rURHJ 

Pressez 

l a toucl'ie ( -U 

Pressez 

la touche t31 

écr l ‘i/ez ■ 

1 tup f 1 lu ti-i ijR- lOOH )‘:fec 

Pressez 

L2l 

écrivez = 

24S'5 CRETURN l 

Pressez 

ni 

écrivez• 

1 tRETURIil 

Pressez 

L4J 

Pressez 

L3J 

écrivez ; 

L i St 1 Ti9 b l aïiC CR- l l'iü - ! 

P ressez 

la touche t21l 

écr 1 vez : 

13Ü tRhTüRHl 

P ressez 

la. tou die 111 

écr ii./ez = 

1 tRETURHl 

pressez 

la touche 1.4 J 

Pressez. 

la t-Tiuche Loi 

écr 1 vez ' 

Lecteur hV’ - si-ecia. i ni 

Pressez 

L21 

écrivez ■ 

680 CRE I UR.m 

Pressez. 

LU 

ecr 1 vei■ 

1 LRETURMl 

Pressez 

L‘31 

P resse z 

L?1 

Pressez 

la touche LesPacel 

pressez 

C3J SI ••••'lus 3.vez des at t 

Pressez 

l -3. t oucPie C01 

Pressez 

la touche C51 

Pressez 

la touche lll 

P resse z 

13. tou'ihe LesP' ace l 

P ressez 

1 a t our lie ï e si' ace' 1 

Pres-seZ 

C21 

Pressez 

ni 

écrivez = 

23 LkEl URin 

Pressez 

la touche Lest-acel 

Pressez 

L01 

P ressez 

C3J 

Pressez 

Lll 

suivez l 

es l'Trstructioïis ‘lui •..•ous 

Pressez 

la touche LesPacel 

dés ‘iu.e 

le Pro9rarnroe des douviees 

Pressez 

la touche L41 

Pressez 

l a toud'ie 111 

écr 1 vez = 

£3 LRF.TIJPHI 

Pressez 

la touche LfaI 

Préparez 

: ••./otre feuille sur l ‘ ii'ii'i 

Pressez 

l a touche C.?l 


i:Rt-Ti IR! n 


r.ibl.r iR^^fi.iPiri! 


ûOü f rRni.ij^fij 

I. ! 1. Mû 1: fe 1.1 f f RL" n JRf iri 


iIni'.i ''J ll'll ■i'11 I I ►: • lltlll Û ‘ 1*1< n I II:; r . 


ï t.i iit- iJoii rti^fîi l' -^.r l ' I"ir iJ i Tl ;<.t 6-ij.r , 

1= = t •£• Tii i':* 1 S-1 r é ■= '.i.r <z}. s ~ e t: < c 

liilAiiLt:' "ll.'.l Cjoit- ttf't îOLlî-~t êïVS i l'.iTl 
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10 REH 

n RBitttiititittittMtttnttmitttt 


22 RQIl I 

24 RE» lOCICia K FRCTIMTCN t 

2 t REOn POUR HTHOS < 

20 RE» t 

30 RE» I 

31 RE» MmiK ; I. BEEKU GUY I 

32 RESn 23 rut St-Uurmt t 

33 RE 3 lt 28400 lOGEJtT-LE- i 

34 RE» nnnu t 

30 RE 3 li I 

30 RE 3 lt MTE : 08 / 01/83 t 

37 RDIi VDSlOi: «140 Clitati pour « 

38 REHt «nos O CP-lOOA I 

37 RE 3 I« I 


40 RE»imt«ttiiiramttmtttti>tt 
42 RE3I 
44 REH 

50 RE3I-- 

51 RE2I IIITIN.ISATIOI 

52 REH - 

34 PIIIIIT CHRYITI 

50 in 4:PM>E3I 0:CLS 

38 DIH F«(30.20l:0IR F(0I,20):DIR BiSOI 

00 FOR I«0 ID 300 ÿET 40 

02 PORE lfleA8*I,20:P0IE 0B8A7«I,7 

04 KIT I 

00 PRlir t ll, 3 ;Cn«( 7 T):*R';Cli»( 2 T);’R’;'FM;TUMTI 0 R 
01 PRin t ll, 4 :CW«l 2 TI:*R*;aiH( 27 l:‘C':'FMmMTI 0 I 
70 PRin 0 T.ii;c»«in):*r:'MnEW : c. beimi itrs 
72 PRIIT t 7 .l 2 ;Ca«l 27 ):*J’:'MnElK ; c. BEXMJ 1785 
74 FOR IMI 70 320 STEP 40 
70 PORE OROOe«I. 2 «:PaRE OROOOM.T 
70 107 I 
77 P 8 in:PRIRr 
80 PRin'VERSIOH : 

82 PRin:PRin SFCMl'Utilitoblf wr ORIC R7H06 * liorl- 
84 PRIRT:PRIRT SKI4l‘Niitt GP-lOOA. Il gtrt 7 I 40 011- 
80 PRIRTlPRIRT SFCI4l'tfiU. 

88 PRin:PRin 

70 PRin -APPOrES SUR IRC TOUOC POUR LE IDIU *: 

72 on 14 

100 m. 

101 KH KHO 

102 REH. 

101 IF PEEXI0flB«TI*83 -710 PRin CMHI20I 

107 05:1* 7:P«fa 0 

110 FRin:PRin‘0|tioai : 

111 PRin t T,3:C»«I77):'F':*0- Cli<rttH«t 

112 PRin t 7.S:Clini27);'A’:‘l- Doit 
114 PRin t 7,T:C»4(27l:‘B':'2- OoMm 
110 PRin I 7,7.'Ca«(27l:*C‘."3- Stuviytrdt 
110 PRin t 7,ll:CHR«ini:'D‘:*4- FKturitian 
120 FRin 0 T.I3;CW«I27I:'E*;‘3- Totaui 

122 PRin f 7,l3:Cntl27l:‘F*;'0- Adrtiws Clittili 

124 PRin t 7 . 1 T;CHR«l 27 );*A'.- 7 - Rnim CIlMti 

120 PRin f 7,17;(W(ni:'B".-8- 7V0 

I2f PRin t 7,2l;(HN(27):‘C*:’7- Corp On iKlurn 

127 PRin I IT,2S:’Ettrti «olrt ckoii 

130 on 14 

132 IF IlrORNIII TKH EID 

133 IF I4>’0' IKH 4M 

134 1>VM.IIII 
130 CLS 

138 01 I 0070 200.400.430.1IM,7M.380.7M,700,ISO 
140 GOTO IM 

150 REH - 

151 REH 7-Corp Oit (icturn 

152 REH-- 

130 CLS 

131 IF PEEH(IB8A7I>S3 7»H PRin CW«(2C: 

100 IK 7:P«PES 0 

101 FRin'Opliont : 

102 PRin t T,3:CRR«I27I;'A':M- ROH Ot l'Mlrtpriw 
104 PRin f 7.3;CHN(2T);'B*:‘2- Capitol SML 

100 PRin t 7.7;Ca«l27l;'C';‘3- RUE Ot l'MtrtpriM 
lOB PRin t 7,7;Cn«l27l:-D';'4- VILLE Ot l'ttlrtpriH 
170 PRin I 7,II;C»«I27);‘E*:‘S- Ttltphott 
172 PRin t T,l3;CIRHI27l:‘F*:-0- SlREX/CCP/Tilti 
174 PRin I T,13;aBI«l27);'B'.-7- RC/RH/HPE 
170 PRin f 7.IB;Cn4l27l:'C':'8- PDiltio* Ot l'ntitt 
178 PRin f T,20;CaNI27i;’D‘:’7- Qiinttttiit Ot l'Mtttt 
112 PRin t 7,23;C»1I27I:*F':*0- lEHU 
104 PRin f 20,24;‘Bitrti >olrt choii •; 

180 en 14 

108 PRin 


170,1F PEIXIIBBA7lr83 THEH PRin Clf)«(20l 

171 IF I««‘0‘ THEH 108 

172 IF IKMMIBI THEH EHD 

173 CLS:IK 1:PAPEH 0:PRin:PSin:PRin:PRin 

174 IF ItO'V THEH 202 

173 REH —— COonptMflt O'ontttt 

170 PRin'Entrtt I : ';FIII,lll:PRin‘Ciitttt-2 : ';FIII,l2l:FRin'Eiitttt 3 : *; 
Ftll,l3l 

177 PRin'Enlêtt 4 : VFtlI.MnPRin'EtUlt-S : •:Ft(l,15):PRin’Entttt-4 : •; 
FtlI.IOl 

178 PRin'Entitt-7 : '.'FtlI.ITI:FRin*Enttlt-B : ';F«ll,I8l:PRin‘Entttt-7 : •; 
Ft(l,l7l 

177 PRin:PRin:PRin 

200 PRin'OutI ni It nuttro Ot l'ntttt o clitiiptr 7 ';:GET A:PRin 0 

201 IRPUT'Qutl nt It oouvol tnttti ':Ftll,10*OI:CLS:GOIO 140 

202 IrVALIItlIIF IrB THEH 221 

203 REH ~ Mrnst Ot l'tnirtpriti ~ 

204 PRin:PRin'l- •.■FI(l,0l:PRin;PRin’2- VFtll.n 

205 PRin:PRin-3- ■;Ft(l,2l;PRin;PRin‘4- •; Fin,3) 

200 PRIirPRin'5- VFIIl.tllPRiniPRin'O- VFtll.SI 

207 pRin:PRin’7- vFoii.éhPRiniPRiniPRin 

208 01 I COSUB 210.211.212,214,210.218,220 
207 a.S:GOIO 100 

210 IREVTM-OutI nt It ROR *;FIII,I-I):REIURH 

211 IVUT*2-<lutl nt It Copitol SMR. ’;PtlI.I-ll:RE7Uai 

212 IKVr3-Outl nt la RUE *;Ftll,I-ll:RETllBl 
214 IKVTM-GutI nt la VILLE ‘:Ptll.l-ll:KT«l 
21HKW5-flutl nt It Ta. •:Ftll.I-ll:RETUHR 

218 IHPUT'O-Outl nt It SIRET/CCP/TtIti ':Ft(l,l-ll:RET1lll 

220 IKUT*7-Outl nt It RC/RH/HPE ■:Ft<l,l-ll:REIUII 

221 REH — Pofition Ot l'taUtt " 

222 PRin’aiaiS )aUHS-PRII’;PHin:PRin*tfitttt l: ou l au VFlO.lhPRin'ntt 

tt-2: Ou 

223 PRin FIO.ll,- au 20MRin:PRin’CLIEirS H iniCLES":PRin;P8in' Dont TVH 
l’ ERIRTntatt I: Ou*; 

224 PRin* 21 au •:FI0.2I:ERin*t«lttt 3: Ou 'IFIO.^I:* au •;FI0.3l;PRin*nttt 
t-3: Ou *1 

225 PRinF(0.3l;* au •.•F(0,4):PRin:PRin* ♦ TVH:*:PRin*t«lttt I: Ou •:F(0.4): 
• au •:FI0.5I 

220 PRin'ntttt 3: Ou ‘.FlO.SI:* au ■;FI0,0):PRin’i«tttt 4;\ ‘.FIO.Ol:* au 
•;FI0.7I 

227 PRin*ntttt-0: Ou ‘IFIO.TI;* au *;FI0,B):PRin‘t«tttt-7: Ou •;F(0.8l;* au 
•;F(0.71 

228 PRin*t«tttt-8: Ou •;FI0,7l:* au •;F(0.10):PRin*tBttlt'7; Ou ‘.FIO.IOI;* a 
U 40* 

227 PRin:PRin CIBtl27l:’DPmlio«nt It curttur n lact Ou cHil 

230 FRin CMHI27l:*D(rt put tu vtui chanptr puis itOiput 

231 FRin CW«l27l:*Dlt n appupaiit lur IRETIMI 

232 PRin (»«lll);CW«llll;CiHnilll;CIRHIIII;CIRMIlll;CMHI7l;CMR«l7l: 

233 PRin C»«l7l;C»4l7l;Cn«l7l;C»«l7l:Cn4l7l;CII»l7l;aiHI7l;CWtl7l: 

234 IF Pail02M)>0B4 TKH PRin CMHUOI; 

233 IF FEXlll20ei'07C 7WH PRin CWttlII: 

230 IF FEai02O8)*5 71EH FRin CMHUOI: 

2r IF FŒI(t208l-23 THEH FRin CMHIIII: 

238 IF PESIItTMlOOAF TKH 234 

240 IF FEZII0208I*0 TKH H*l 

241 IF FEEXI0208I-12 TKH H>2 

242 IF PEa(l208l*l3 TKH H>3 

243 IF PEail0208l>lS TKH H-PQXI0208I-I2 

244 IMVT* •IFIO.HI 
257 CLS:GOTD 100 

200 REH-- 

201 ROI l-Oatt 

202 REH- 

203 IK 7:P«PBI 0;CLS 

204 IF PEaiMBHTI*83 TKH PRin CMHI20I 

203 FRin f lO.U’Lt 'iFOd.TI:' ’lFtlI.BI:* 'iPtlI.VI 
2U PRin f l,4:‘Qption ; 

207 FRin t T.T:CHHI27l:‘H*:’l- lOIR 

208 PRin t 7,7;CMni27l;’B*;*2- ROIS 
207 PRin f T.II;C8Rt(27l:*C*:‘3- ARE 

270 PRin 8 7,l3:CHni27l:*D*:‘»- SHU 

271 FRin 8 20,18:*btrti votrt cAoii *: 

272 PRin:FRin:FRin;PRin:PRin:CR II:IF lt-*0* TKH IM 

273 IF IKMHOI TKH E» 

274 I«VALIItl 

273 IF 1*1 TKH PRin'QutI nt It nouvtau lOUR *: 

270 IF 1*2 Tia PRin'flutI nt It tiourtau RCHS *: 

277 IF 1*3 TE PRIRTOutt nt la Nuvtllt AMB *; 

278 IF M OR 1*2 OR lO IKH llfVT Ftll.0*II 
277 GOTO 200 

2M ra- 

281 E O-AOrnan Clinti 

282 m- 

284 n 7:PAPES 0 

280 OS 

288 IF PQHI0BBA7I«83 TKH FRin CMHI20I 
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2W nir'OptiMs ; 

m «lit 1 7.3.ciiW(27):*â*;*i- Mim du clidt 
294 PBIMT t 7.S;C«II27I;‘B';*2- LISTE 1 DES aiElTS 

293 niir t 7,7;C»I(27):'C':*3- LISTE 2 DES aiEVTS 

294 PRin ( T,9;CW«(27);‘D‘:‘0- IE3U 

295 PRIIT t 2t.l2:*Eiitrii votrt ckoii *: 

299 PRIIT:nin:F8IIT 

304 CCT II 

302 IF ll>'0' TTOI lOe 
304 IF 1401)413) TTCX □■) 

304 IF I4-*2* TTa COSIB 340 

307 IF I4**3* TTO COSUB 380 

308 IF I4>'I' THEI 310 

309 GOTO 280 

310 l>RIIIT:III>ur'auiI nt It nuwro du cIim4 M 

312 OS 

313 IF PEEX(IBU7)>e3 TTO PRir CM)4I28I 

314 IF 041 THEI 324 

313 PRin'OptiDM : 

314 PRIR t T,3:CH)4l27l:‘A‘;'l- Kll 

317 PRIR ( 7.3:CII)4(27);‘B‘;"2- RUE 

318 PRIR ( 7.7;C»4(27l;’C‘:*3- VILLE 

319 PRIR t 7,9;Cll)4(27i:*D':'4- MITRE aiER 

320 PRIR t 7,Il;CW4(27l:\E*:*0- IDII 

321 FtlR:eRlR:PRUI:PSUT 

322 IF 1)20 TTO 324 

323 PRIR F4(2.I):PRIR F4(3,I):PRIR F4(4,ll:COTD 323 

324 PRIR FI(3.B-21):PRIR F4I4.I-21);PRIR 0(7,1-21) 

323 PRIR:PRIR:PRIR:PRIR TBB(20)*En4rii «otrt dioli *: 

324 CCT I4:PRIR:PRIR:PRIR 

327 IF I4>'0' TTO 108 

328 IF I40Ct(3) TTCM E» 

329 IF I4»M' TTD 280 

330 I*VN.(I4) 

331 IF )D20 TKX 334 

332 01 1 COSUB 340,342,344 
334 C070 312 

334 08 I COSUB 344,348,330 
338 COTD 312 

340 PRIRMVUT'Ouel M( It 108 ■;Ft(2,l) :RETTIRI 
342 PRIR: IMVT'QutI «4 li RUE ■;F4<3,I) ICETUIM 
344 PRIR:IVUT'0utl Ht 11 VILLE ■:F4I4,I):RETII)I 
344 PRIR: laPUT'CuiI Ht II K» ■:Ff(3,l-21):ICTim 
348 PRIR:I*VT'0utl Ht II RUE *:F«I4,I-21I:REIURI 
330 PRIR:IIFUT'autl Ht la VILLE ■;F«I7,I-21I:RETURI 

340 H2I- 

341 SES S-P LISTE I 

342 REH - 

344 IM 4:PAPER 4 

344 CIS 

348 PRIR'La litti I dH cl i ntt Ht ; 

370 PRIR:PRIR 

372 FOR 1*1 TO 20 

374 PRIR 1,FI(2,X):KZT K 

374 PRIR:PRIR'llppu|ifi wr unt toucAt tour cmtitutr' 

378 CET II 

379 RETIBI 

380 REH-- 

381 REH S-P LISTE 2 

382 REH- 

384 IM 4:PM>a) 4 

314 CLS 

388 PRIR'U littt 2 dti clintt Ht : 

390 PRIR:PRIR 

392 FOR I«0 70 19 

394 PRIR X*2I,F4I3,KI:KXT K 

394 PRIR:PRIR'Atpuyii tur uni touclii pour continuir' 

398 CCT II 

399 RETURI 

400 REH- 

401 REH 0-Cliir9nmt 

402 REH - 

403 CLS: IM 0:P«FES 4:raiR:PRIR 

404 FRIR'Oml Ficturn dniiiiHi-rout di cAirfir 7*:PRIR 

403 PRIR,*1- FKtuTH l’:PRIR,’2- Ficturn 2’:PRIR,*3- Ficturn 3’ 

404 PRIR,*4- Ficturn t*;PRIR.‘3- Ficturn 3‘:FRIR,*4- FKturn 4' 

407 PRIR,‘T- Ficturn 7‘:PRIR.‘8- Facturn 8*:FRIR,‘9- Ficturn 9' 

408 FDR 1*1 TO ll:FRIR CWIIll);:EtT 1 

409 FOR M TD 3:PRIR CMIII9);:EIT l:GET I:CLS:PRIR:FRlR'Ficturn *:I;PRIR 

410 PRIR'Pour ckir9ir In doniwn pnitiOMii II iignito * 

411 PRIR'apiuyii lur PLAT puil' 

412 niR t l2,l3.Ciin(2T):‘r:C»l(27l:’8 ATTESBCZ SVP 

413 PRIR t l2,14:CWtl27l:‘r:CWtl27l:'E AT7E3BCZ SW 

414 IF l'O Tia 108 

413 DR I COTO 418,419,420,421,422,433,424,423,424 

414 COTO 400 

418 RECNX FI.'FKturn l'I RECALL F,‘Faclurn l'I COTO 108 


419 RECALL Ft.’Facturn 2*1 RCCAa F,‘FKturn 2*: GOTO 108 

420 RECALL Fl.‘FKturn 9‘; lECALL F,‘FKtiirn 3‘; GOTO 108 

421 RECAa Fl,‘FKturn 4‘; RECALL F,‘FKturn 4‘: COTD 108 

422 RECAU FI,‘FKturn 3‘: RECAa F,‘FKturn 3‘; GOTO 108 

423 RECAa Fl,‘FKturn 4‘: RECMl F,‘FKturn 4‘: GOTO 108 

424 RECAa Fl,‘FKturn T‘: RECMl F,‘FKturn T‘: GOTO 108 

423 RECMl Fl.‘FKturn 8‘: RECMl F,‘Ficturn B‘: COTO 108 

434 RECMl Fl.‘FKturn 9‘; RECMl F,‘FKturn 9‘; COTD 108 

430 REH- 

431 ROI 4-Sluvi4irdc 

432 REH - 

433 CLS:IM 0:PAPES 4:FRIR;PRIR 

434 PRIR‘lkiiI FKturn dioiiiiui-voui di iiuvifirdir 7‘:PR1R 

433 P8IR.‘l- FKturn l‘:P8IR.‘2- Ficturn 2‘:PBIR.‘3- FKturn 3‘ 

434 PRIR,‘4- FKturn 4‘:FRIR.‘3- Ficturn 3‘:PRIR.‘4- FKturn 4‘ 

437 PRIR.‘7- FKturn 7‘:PBIR,‘B- Ficturn e‘:PRlR.‘9- FKturn 9‘ 

438 FOR 1>1 70 11:PRIR C»llll);:KtT I 

439 FOR 1*1 70 9:PRIR C»l(9l::Kn I:CET I:(IS 

440 FRIR‘Pour iiuviyirdir In iHwvilln doMiin‘; 

441 PRIR‘ pnitiOMii II iifnitD.appuyii wr REC0RD‘: 

442 FRIR‘ puif ippuyii wr uni toucAi di l'ordinitiur‘ 

443 CET II:CLS 

414 PRIR t 13.13:CWt(2TI;‘l‘;CII)ll27l;‘A ATTEMEZ SVP 

443 PRIR t 12.I4:C»II27).'‘I‘;C»4I27I:‘E ATTEMEZ SUP 

444 IF I>0 THOI 108 

447 08 I GOTO 431,432.433.434,433,434,437,438,439 

448 COTO 430 

4SI STORE Fl,‘Ficturn l‘:PI8IC 1302.183:8817 SOO:STORE F,‘Ficturn I‘:COID108 

432 STORE Fl,‘FKturn 2‘:P0KE 0302,183:1817 S00:STDRE F,‘Ficturn 2‘:00r0108 

433 STORE Fl,‘Ficturn 3‘:Pa(£ 1302,183:8817 3O0:ST0RE F,‘Ficturn 3‘:COTD108 

434 STORE Fl.‘Ficturn 4‘:PaiIE 8302.183:8AIT S40:ST0RE F,‘Ficturn 4‘:COTO108 

433 STORE Fl.‘Ficturn S‘:P0KE 0302,183:8817 S00:ST0RE F,‘FKturn S‘:C0I01I)8 

434 STORE Ft,‘FKturn 4‘:P0RE 0302,183:8817 S00:ST0RE F.‘Facturn 4‘:G0T010e 

437 STORE Fl.‘Ficturn 7‘:P0RE 0302.t83:8AIT 300:ST0RE F,‘Ficturn 7‘:COTO108 

438 STORE Fl,‘Ficturn 8‘:P(XE 0302,1B3:8AIT 300:ST0RE F,‘FKturn 8‘:GOTO108 

439 STORE Fl.‘Ficturn 9‘:P0IE 0302,183:8AIT S00:ST0RE F.‘Ficturn 9‘:COIOIOB 

440 REH.. 

441 REH 2-OanaiH 

442 RDI.— 

444 IM 7:PAPEH 0 

443 CLS 

444 IF PEI8ltBBA7l>83 THE8 PRIR CHRII20I 

447 PRlR‘Option( : 

448 PRIR 8 T,3;CWI(27):‘A‘:‘I- HUHERO OU aïOIT 

449 PRIR t 7,S;CIBI(27l:‘B‘:‘2- LISTE 1 DES aiEITS 

470 PRIR 8 7,7;CII1II2TI.‘C‘:‘3- LISTE 2 DES aiDTS 

471 PRIR 8 7,9:C*l(27l;‘D‘;‘0- «HU 

472 PRIR 8 20,l2;‘Cntrii «otri chou ‘: 

473 CET 11 

474 IF ll«‘0‘ THEH 108 

473 IF 1108)1131 THDI E» 

474 IF II>‘I‘ THEH 480 

477 IF Il>‘2‘ THEH COSUB 340 

478 IF Il>‘3’ THEH COSUB 380 

479 CLS:COT0 444 

480 PRIR:PRIR:PRIR:IiniT'Ouil ni II nunro du cl ml ‘:K 

482 IF »40 TWH 443 

483 IF 8)20 TIEH 490 

484 PRIR:FRIR‘U nuMro di la ficturi iliil ‘;Ft(8,8l 
484 IWT’Duil Ht II nouviiu nunro ‘:FI(8,H) 

488 COTO 300 

490 PRIR:FRIR‘Li nuMro (H la licturi itait ‘;FI(9,I-2II 
492 IirUT‘l)uil Ht II nouviau nuwro ‘:FI(9.8-211 
494 GOTO 330 

300 REH —. aiEHTS JOURS - PRIX- 

302 CLS:PAPDI 4: IM 4 

304 IF FEEHIIBBA7I*S3 THEH PRIR 08)11201 

SOS PRlR‘Pour ‘:FII2.8);‘ la liiti dn diln nt :‘ 

304 FDR 1*0 TO 9 

307 PRIR:PRIRI‘ - ‘;F(8.I).‘ ‘;FI(l,8).F(8.Irl0l 

308 8EIT I:PRIR:PRIR 

309 PRIR'Quil ni II nuwro corrnpondint i II diti i wdifiir ‘::CET A 

310 CLS:IM 7:IWES 0 

SU IF PEEX(IBBA7)>83 THEH PRIR 08)1(201 

312 PRIR:PRIR A.‘Ll ‘;F(R,AI;‘ ‘;FI(1,SI‘ : ‘F(R.AUO) 

314 PRIR:PRIR:PRIR‘0ptioni ; 

314 PRIR I 7,9:CM)l(27l;‘A‘:‘l- JOlf) 

318 PRIR 8 7.11;OIll(27l:‘B‘:‘2- PRIX 

320 PRIR I 7,l3;a8KI2TI;‘C‘;'3- ww cliHit 

322 PRIR 8 7,lS;081l(ni;‘D‘;‘4- lutri cllnt 

324 PRIR 8 7,I7:O«l(27l:‘E‘;‘0- lEHU 

324 PRIR:PRIR:PRIR:PRIR TAB(20l‘Entrii votri ckoii ‘: 

328 CET II:PRIR:PRIR:PRIR 
330 IF II<»II3) THDI EHD 
332 IF lt>‘0‘ Tl» 108 
334 IF Il*‘3‘ TKH 300 
334 IF ll•‘4‘ THDI 440 
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538 I<VM.(Itl:(ll I COSUB 548,548 
540 GOTO 510 

548 HPUT'OmI Ml II nouviiu Jour':FII,«):REnn 
548 linTIlutI Ml II louvMu Prii*;FII,*«10l:REnni 

550 goi-aiQTS «IICLES- 

540 IF ID40 TIQ 108 

548 CLSlIK TiPAFEK 0 

548 IF FEniiee«7i>B3 na PRir cmhitoi 

800 FRIKT 8 ll.l.-’Cllnit : ’:FI(5,l-7ll 

802 ram 8 i,8:'0ptiMi : 

804 ram 8 T.4;CHH(2T);*«':'I- luwro di l'irticll 
808 ram 8 T.n;CMHI2T):‘B':‘3- Liiti Om «rticlH 
808 ram 8 T,I3;CHN(27I:‘C*;‘3- wtri Cl Int 
810 rair 8 T,IS:Ca«l2TI:‘D':'0- IDU 
812 ram 8 20,lB;'Ciilrii votri cDoii 
814 CCT II 

818 ram:ram:ram:ram:ram 

820 IF ii*cmit3i na e» 

822 IF ll''0‘ TtEX 108 
824 IF ll>'3‘ TH» 484 

828 IF Il**l' 710 IWUT'OmI Ht II (lUMro di l'irticll Vl :SOTO 830 
828 IF Il>'2' 170 COSOB 880 
824 5010 540 
8X IF 8>20 TKH 540 

832 as:» T.Mm 0 

833 IF FEEX(HU7I>83 710 IVm CMMITOI 

834 ram 8 ii,i:*ciiMt : ■;Fi(3,>-2i) 

838 ram 8 8,4;*«rlicll 1 ■:Ftll-IO,«l 
838 ram 8 8,8."Prli ; VFII.OI 

840 ram 8 B,8:-iiuwtiti: *;fii»20,A) 

842 ram 8 i.iii'OptioM ; 

844 ram 8 T,l3.'aB1l27l:‘«*:'I- Bmiititl 
848 ram 8 7,l5;aCI(27l:’B‘;*2- nouviau Prii 
848 ram 8 7,l7;Clfni27l;'C’:'3- nouvH irticll 
850 ram 8 7,14;CWII27l:'D':’4- articli wivant 
852 ram 8 7,2l;CM»l27l:’£*;*5- autri articli 
854 ram 8 7,23:CI8II(27);"F*:’0- lOU 
858 ram 8 20,25."Entr|] «otri ckoii 
858 CCT II 

854 ramiram 

880 IF It>CI8)ll3l 710 E3D 

882 IF ll>’0' 710 108 

884 IF II-'5' 710 540 

888 IF Il*'4' TIO AMn :C070 830 

888 IF IM‘3* 710 HBVT'Ouil Ml II RM du nouril articli VFIII-IO.AI 

870 IF H*‘2* 710 IIFUT'Ouil Mt II pria di l'irticll *:FII,AI 

872 IF IIO'I* 710 830 
874 ram'CoHiiM y a t'il di ’;F1II-10,AI;' 

878 IBPUT FII«20,AI 
878 GOTO 830 

880 RHI--- - 

881 REX S-P LISIt OES ARTICLES 

882 RB..-. 

883 CLS:IK 4:PAFER 8 

884 ramiram SFCtni'Ciimt ; *;fii5, 1-211 
888 ram 

888 FOR A^O TO 20 
840 ramA.FICI-lO.AI 
842 lOT A 

844 raillT:ram*Adpuyii lur uai toucAi pour continuir*; 

848 CCT ii:ram 
848 RETUai 

700 RDI.-. 

701 RER 7-Rhim CliMli 

702 RDI - 

703 05:1181 7:PAFai 0 

704 IF imilBBA7)‘83 710 PRIHT CWII20I 

705 ram 8 II,l;*RDIISC OIECTS 
708 ram 8 i.o.'OptiMt ; 

707 ram 8 T,7:CI8MI27l;-A*:'l- RUOO OU OIDIT 

708 ram 8 7,4;CI8ltl27l;'B';*2- LISTE I OES OIDITS 
704 ram 8 7,ll;C«l(27l;'C’;*3- LISTE 2 OES OIECTS 
TIO ram 8 7,I3:CI8HI27I:'D‘:*0- lOU 

711 ram 8 20.18;'Entrai votri ckoli 

712 CCT II 

713 IF II*CWII3I TIO DO 

714 IF ll>'0* 170 108 

715 IF Il*'l' TIO 720 

718 IF Il*'2' TIO COSUB 380 

717 IF Il>'3' 710 COSUB 380 

718 GOTO 703 

720 ram:ram:ram:lVIIT'l)uil Mt 1i nuMro du clint 'Il 

721 IF l>40 710 708 

722 ram:ram 

723 IF l<21 710 740 

730 RDI- CliMta 21 a 40- 

732 raiiru rMiw dt ■;Ftl3,l-2I):‘ liait dl 'iFIOl.Mll:' t 


734 ramiram 

738 IRVT'Oml itt la nouvilli Bhim n X *;FI8l.a-21l 
738 CLSlCOTO 708 

740 REX- CliMti I a 20- 

748 raiCT'U rMiu dl ■:Ftl2,ll:' Hait di *;FII,20);' X 
748 raiCTiram 

750 IWT'Ouil Ht la nouvilli Rhih m X '.'FII.TOI 
752 CLSlGOTO 708 

780 REX- 

781 REX 8-TVA 

782 REX - 

784 IK 4:PAFES 8:CLS 

788 ram:ram:ram;ram:ram 

788 ram'L'anciarai TVA liait di *:FIO,OI:’ X 

770 ram:ram:ram 

n2 IVUT'CmI Mt la nouvilli TVA m X ‘;FIO.OI 
774 GOTO 108 

800 RDI- 

801 REX S-P (OTRE OE CALCUL 

802 RDI... 

804 IF ID20 710 830 

808 REX m FACTURE Datl-Prii lit 
BOB CI*0:C2*0:C3«0:C4«0:CS*0 

804 RDI ~ Tora ai — 

810 FOR I>10 TD 14 
812 CI-CIrFll.n 
814 en I 

BIS REX — RDIISE ai — 

818 C2<ltril,201/100 

817 REX — TOTAL PATE — 

818 C3>CI-C2 

814 REX ~ COmiSSIOR — 

820 C4*tOOtC2/IIOOtFIO,OII 

821 RDI — «TVA — 

822 C5<2-Cl 

823 UO 

824 CT>C3 
828 RETin 

830 RDI ttt FACTURES ARTICLES ttt 

832 IF R>40 TIO ramiFRm'ERREUR'lCCT lÜCOTO 100 

834 CI>0;C2'0:C3*0:C4HI:CS«0 

835 REX — total articlH — 

838 FOR I>0 TD 20 

837 ClvFII.IIIFIRrTO.IIrCI 

838 ECT I 

834 REX — Rmiu CIlMt — 

840 C4>CltFI81,1-211/100 
BII REX ~ Total — 

843 C3>C1-C4 

844 IF l>FI0,4)-l TIO 850 

845 REX — Dont TVA — 

848 CMOOIFIO.O)/llOO«FIO,OI) 

847 CS>C3tC2/IOO 

848 CT<3 
844 RETII» 

850 REX — ♦ T.Ï.A — 

BSI C2<3tFI0.0l/l00 

854 REX — Total a Payir — 

858 C3aC3<C3 
858 CT<S 
854 RETDRN 

400 RDI - 

401 REX S-Totaui 

402 REX- 

404 CLS 

408 m TlPAFER 0 
410 ram'OpiioM : 

412 ram I 7.3.C»l(27l;'A':'l- Total «mirai 
414 ram 8 7.S;Clk>.'7l;‘B*.-‘2- Total d'ua Cliiflt 
418 ram 8 T,7;C»II27I:'C':*0- lOU 
420 ram t 20,12;'Ei.. .1 votri c8oii 
422 CCT II 

424 IF ll«'0' TIO 100 
428 IF II>C»II3I TWX EXD 
428 IF Il«'l' TIO 440 ' 

430 IF Il*'2' TIO 480 
432 GOTO 400 

440 REX- Tora CEIOa - 

442 CLSlPAPER 8:IM 4 

444 raiCTiram 

448 TC-0 

418 FUR R*! TD 20 
444 COSUB 800 

450 S«CT:G0SUB 2000 

451 raiCTI."- '.'Fia.ll;' 'JTABOOIIS 

452 TC^TCrCT 
454 en B 
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TU niR:PRIIT:FRIIT*tpTUT» »•' >"• toucU pour continutr* 

TU ST II 

T3T niir 

TU FOR Ml n W 

Til COSU NO 

TU S<T:C0Ea 2«« 

TU Pïir «:•- VFKS.Hll:’ M«I30»;S 
TM ie-W*CT 
TU KR ■ 

TM Piir apci2»)’-• 

TM 5-Tt:C0aB 20M 

TTO nilT:FBin,‘TOTN.'TlB(2«l;S 

TT2 FRIITiFVIIT'tppuyti wr uM toudw pour coolinuor' 

TT4 CET II 
T7è COTO TM 

T« BU- ioT«L D'iB aiar — 

TI2 OS 

TU !■ TiFirai 0 
TU niR'QptiOH ; 

TM ram I T,3:CMIII27l;*A‘;‘l- liMtro du cl Int 
TTC ram I T,3:Cttll2Tl:*B*;‘2- Uiti Cllnlp I 
TT2 ram I T.T;Caimi:*C':*3- UiU ci mit 2 
TTi ram I T.T;ani(2Ti:'D*:‘o- ie» 

TU ram I 20,I2;‘Ditroi «otrt cteli 
TT8 CET II 

lOM IF ll•'0’ TWX IM 
IN2 IF IKHNOI TIQ EX 
IMd l•«L(lll 

lOM H I C09JB I020,3M.3« 

1»I0 COÏT) TM 

1020 CLSrPOPB) t:IU 4 

1022 ram:ram:iirOT*auti m it tuooro du cimt vi 

1023 IF reaiiæ«Ti>83 na ram asii2oi 

1024 IF D20 TKX lOM 

1023 KX-Clmi Ollt-Prii- 

1020 CLS:ram:ram TMiTi'aiExr : ’;Fi(2ji:ram 

1021 FOR lu TO T 

1030 raiITL» VFIR.II:’ VFKMIlTMlOOl.Fd.inOI 
1032 KR I 

1034 casa i04:ram 
■ou ram ,.*Totil‘T«BI3Tl:CI 
1030 ram ,*Rmim*TMI30I;C2 
lOU ram ,'Total a pirtr'T«(2Tl;C3 
IMI S>C4:G0aB TOM 

1042 ram .’Couitioa'TMI30l:S 

1043 S>C3:Casa TOU 

1044 ram TU'TMIOOI.-S 

1043 ram 

1040 ram'Oppuyti tur uM toucha pour continutr': 

1040 CCT inramiEiiai 

lOM EX-aiBTS IRTICLES- 

1032 IF DH TKX ram'Crrtur':CCT 11:8010 IM 
lOM GOGU OM 

lou dsiram TMioi'aiOT : '.■fii3,r-2ii 

lOM PGR IH TO 20 

lOU ram FID20.II:' ';Ft(D10,l):T10l30l:FID20.IltFII.II 
lOU KR I 

lOM raiRTRotal dtt arlicln'THI2Tl:CI 
lOU S«:COSÜO TOM 

lOU raiir-Rnltt 'Flél.D2ll'l:'CI' • 'S 
lOM IF DFI0,4I-I no lOTO 

lOM RDI-Cl Int Dnt TVO- 

1012 S>O:C0SDB 30M 

1004 raiirOoat TVO 'C3' 1 :'TMI30l:S:COIO lOU 

lOTO KX-Clint ♦ TVO- 

lOTl MTlGOGOB TOU 

I0T2 ram '«TVO ':no.oi'i:'S' • ': 

I0T3 S<3:C0Sa 20M:ram s 
lOU raiRroppurii wr u» toucha': 

lOTO en ii:ram 

lOTT OETUa 

UN EX... 

1101 EX 4-Facturatlea 

1102 ra- 

1103 FOR OH TT) 30 

1104 RIO)*! 

1103 BT 0 
IIU 0>l 

IIOT aS:W T:NffX 0 

un IF FBIOOBOT1-03 TKX PRIR CWIITO) 

1110 raiiroptioni : 

1112 ram f T,3:C»II2T):'0':'1- lUtro du clltat a lacturar 
1114 ram 0 T,3:C«II2I):'0':'2- Ficturalion 

1110 ram 0 T,T;C»II3T):'C':'3- Utlt Clmtt I 

1111 ram I T,T:CWtl3Tl:'D':'4- Liait Clianti 2 

1120 ram 0 T.U:CHRII2Tl:'E':'3- Liftt 1 Clmtt a laclurtr 
1122 ram O T.13:Can(2TI:'F*:'0- Liait 2 Clmtt a lacturar 


1124 mm t T.IS;CailRl:' 0 ':' 0 - Onu 
1120 ram 0 20.ll:'Ehtrti votrt chou ': 

1130 en II 

1132 IF ll*' 0 ' 1 KX IM 
1134 IF IIHaRII 3 l TKX EX 
IIU IrTOLIIII 

1136 OR I GOSUB U 30 .I 310 , 300 . 3 N.UTO.UTO 
UH COTO IIOT 

1150 EX- 

1131 B S-P Outtro clint laclurtr 

1152 KX ----- 

llU IF D 30 1 KX Kimi 

1136 ramiram 

1100 IKVT'Outl nt it nuttro du clint t lacturar ';N 
1102 IF DH TKX REIT]» 

IIU 1 I«I>R 
IIU OUM 
UM ETin 

IITO EX- 

IITI EX S-P Liait 1 Clinti laclurtr 

UT 2 KX- 

1174 CLS:IK 4 :POPERO 

IITO ram* Littt I dtt clmtt a iKturtr' 

1170 FG 6 !•! TD 23 

UN rami:'- ': 

1102 IF BIIDTO TBI PRIR Ftl 3 .BIII- 2 l) 

UM IF 111 X 21 na ram F 112 .B 1111 
llU BT I 

IIR raiR'Oppuyti wr unt loucha pour coaliattr*: 

UM en II 
lier loiiBi 

IITO EX.. 

lITl KX S-P Litlt 2 Clmtt lacturar 

UT 2 KX... 

UT 4 CLS:IK liPtfER 0 

IITO PRIR* Luit 2 dtt cl mis a laclurtr* 

IITO FUR UTO TO 30 

12 M raiRl;'- '; 

1202 IF BIIDTO TKX PRIR FII 3 .B(II- 2 II 
1204 IF 111 X 21 TKX PRIR FII 2 .BIIII 
I 2 U BT I 

1207 PRIR'Oppuy» tur unt toucha pour continutr' 

1200 en II 
120 T ISTJin 

1210 KX. 

1211 KX S-P Facturation 

1212 KX. 

1214 CLS:IK 4 :PAPER I 

1210 FOR Ml TO 0-1 

1210 DBiiiuram 0 . 

1220 IF D 20 TKX PRIR FII 3 .X- 21 I 

1222 IF I< 2 I no PRIR FII 2 .RI 

1223 IF OrO OR DU 710 KR 0 

1224 COSUe OMiCOSUB I 3 M 
1220 BT X 

1220 XUSIC 1 , 4 , 10,12 
1230 en II 
1232 KTIXM 

12 T 0 KX- 

12 TI REX S-P Faclurt 

12 T 2 REX.- 

ISM IHiLPRIR CHRIIKI: 

1301 IF FlIl.OlO" 1)0 LPRIR Flll.Oi: 

1302 Lram CHHIIFI: 

1303 IF D 30 no 1 I<FI(T,D 2 U 

1304 IF 1(21 TKX àl>FI(l.RI 

1303 IF MO" no LPRIR T»I 40 I:'FACT 1 )R£ : ':M OSE LPRIR 
1307 IF FUI, 1 ) 0 " 710 LPRIR Plll,U ELSE 14*1 
ISn IF PIU, 2 IO'* TKX LPRIR FIU. 2 I ELSC R•l•l 
1310 IF Plll, 310 " TKX LPRIR FIU. 3 I ELSE luR*! 

1312 IF FUI. 410 " no LPRIR FUI, 41 ; 

1313 LPRIR TMIHI.'U ':FU 1 .T):' '.FUl.O);' '.FIIl.TI 

1314 IF FIII.SIO" TKX LPRIR FUI.SI ELSE II 4 *I 
1310 IF ru 1 , 010 " TKX LPRIR FUl.O) ELSE (>l*l 
1320 FCR Ml TD 0*0 

1322 LPRIR 
1324 KR 0 
1320 OH 

1326 IF D 20 TKX 0*3 

1330 LPRIR SPC(UI;FU 2 *l.l-IBtTI) 

1332 LPRIR SFC(U);FU 3 *B.DIBr 7 ll 
1334 LPRIR SPC(UI:FU 4 *B,R-IBtTI) 

13 U LPRIRlLramiLniRlLPRIRlLPRIRlLPRlR 

1340 REX-FACTTBE DOTES - PRIl- 

1342 IF D 20 no 1420 

IM 3 IF KFIO.II no 1330 

1344 ROI- Entait 2 ntiar —- 
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1349 LPRin SFC(U):FI(i,l2) 

1344 L>LaiFlll.l3ll 
1347 GOTO 1361 

1330 ROI - Enlilt 1 ♦ Mit -— 

1394 LFRin SFC(16>:FI(l.lll;’ 

1339 IXai(Ft(l,lll»nil,ll*Ftll.4ll«3 
1336 «fLOTIlFtl 1,11,11 

1357 IF 44«‘t' OR 61-V IHDl LFRIIIT—;:W.-1 ELSE IFRlKI't •; 

1330 LPRin Fltl,ei;' ’;FII1,7I 

1360 LFRir SPCIUI; 

1361 FORS*! 70 L 
1367 LPRIRT*»"; 

1363 KT Q 

1364 LFRin:LFRIIT:LFRin:LFRir:(>0 
1363 FOR 1*0 TD 4 

1366 ir FII,1I«0 7)0 1374 ELSE S'FIR,)l:COSUB 7000 
1360 LFRin TM(11I‘U 'TMIlTtLI.-S:* ‘;FII1,SI; 

1370 S^II.I»10l:COSUB 3000 
1172 LFRin TM(32»L);SI;K*I»1 
1174 KT I 

1176 IF l'I THD 1-1 :COTO 1303 

1370 LFRin SFC(92I*-' 

1100 S^nGOSOB 2000 :LFRin TM( 33 <L|;S 4 

l'302 LFRin 

1304 S<3:C0SUB 3000 

1303 IF S°0 THEX IJ>Rin:LFRin:LFRin:COTO 1344 
1306 LFRin T»I30I'-*TMI33*LI.'SI 
1380 LFRin SFCI32I.. 

1340 S43:C0SIB 3000 

1342 LFRin TMI 32 «L):SI 
1144 LPRintLPRin 

1343 S<4:CaS08 2000 

1146 IF S«0 TKX LFRin:LFRin:LFRin:LFRin:C01D 1410 
1340 LFRin TMllI'Volrf coMiuion :'T6BI26*LI:SI 

1400 PG-.aosm 2000 

1402 LFRin TMIOI'* TVA *;F(0,0l:'t :*TABI26«LI;SI 

1404 LFRin TABITTI*-' 

1406 S<2:C0SIR) 3000 
1408 LFRin TAa(26*L):S4 
1410 FOI l>*l 70 27HI 
1412 LFRin 
1414 en Q 
1416 RETUM 

1420 REH- FACTURE aiERT ARTICLES - 

1422 IF l<FI0,2l lia LFRin SFCI16l;F1ll,lll:* 0*::L<LaiFlll,llll:C070 1432 

1433 IF l<FI0,3l TWX LFRin SFC(16l:Ffll,l3l:* d’::L>L£l(Flll,13)1:6070 1432 
1424 IF R<FI0.4l T» LFRin SFC(16l;FIII,l3l:L>U3KF1(l,13ll:GOTO 1440 

1423 IF KFIO,!) TWR LFRin SFCI16l;Fin,lll:* d'.'lL’LaiFlll,1111:6070 1432 

1426 IF l<FI0,6l IKX LFRin SFC(16I;FIII,I3I:’ d'::L*LEIIFIIl,1311:6070 1432 

1427 IF 0<FIO,7) 710 UiRin SFCII6l;F)ll,M):’ d'::L<LBIIF4ll,l4ll:G0T0 1432 
1420 IF KFIO.O) lia Lnin SFC(16l:F1ll,16l:ü4iIIF1ll,1611:6070 1440 

142V IF KFIO.VI lia LFRin SFCII6l:FIII,ITI:lXEI(FtlI,17)1:6070 1440 
I4M IF KFIO.IO) lia LFRin SFCII6l;Ftll,IO):L>LEIIFtll,10)1:6010 1440 

1431 LFRin SFCII6l;nil,lTI:L*LBIIFIII,1711:6070 1444 

1432 RE3I - Eiittll * Mit - 

1434 L>L«3HiIIFill.8l«Flll,VII 

1433 AfLEnilFt(l,8l,ll 

1436 IF Al-’t* OR Al*'0‘ 710 LPRin—; :L*L-1 ELSE LFRin’t 

1437 LFRin Flll,0l;‘ •;F1I1,VI 

1440 Cl s««s«MB»snssnss 

1441 IFRin SFCIU): 


1442 m a>l 70 L 

1443 LIRin 

1444 KH 0 

1443 LrRin:LFRin:LFRin;LFRin:lFRin:lFRin:l >0 

1450 RER- Articln - 

1432 0>0 

1434 IF DFI0,4I-I 770 0>l 
1436 FIS 1«0 70 IV 

1430 IF FI|t30,JI'0 7)0 1472 ELSE S^ll«20,ll :60Sa 3000 
1460 LFRin TASI4»LI;S:TMI10l;nil-IO,il: 

1462 S>FII,JI:60SUB 2000 
1464 LFRin TAB(30«LI:SI; 

1466 S«FII,JI(FII«20,I):G0SUB 2000 
1460 Lnin TABI62*LI:S4 
1470 IHIM 
un EXT 1 

1474 IF l'I 7)0 l-l:GOTO I4V0 

1476 URin 7AI(62I* - • 

1470 »«l:GOSIB 2000 
1400 LFRin TA0I62«LI:SI 

I4V0 OBI- RmIu - 

I4VI S<I4:G08UB 2000 

14V2 IF 54 7)0 l>l-4:G0T0 I4V0 

14V3 LFRin 

I4V4 LFRin TABI36)‘- RMitt dt ‘FI6I,I-3II' 1 :':TA8I63*LI;SI 

I4V5 URin tABI42l’-• 

I4V6 SO: 60 Sa 2000 :LFRin TABI63*LI:SI 
I4V0 IF 04 7)0 1320 

1500 HER- Ftclurt ♦ TVA - 

1302 LFRin 

1304 S<2:C(I£UB 2000 

1306 LFRin TABI36I'< T.V.A. dt ’FIO,OI‘ 0 ;*:TABI62*ll;St 

1300 URin TABI62)’-* 

1310 549:6060 2000:LFRin T»I62*LI;5I 
1312 GOTO 1330 

1520 m-Ftclurt Owit TVA - 

1322 LFRin:LFRin:LFRin 
1324 542 : 605 » 2000 

1323 LFRin TAB(20)'Dool T.V.A. dt ’S* 0 ; *; 

1326 5 43:605» 2000 

1328 LFRin 54 
I3X FIS >1 70 27-0 
1332 LFRin 
1334 BT 0 
1336 ETURN 

2000 KTI-5-F FUISSARCE- 

2002 IF 5>VVVV 7)0 L4 ELSE L*1 
2004 IF S<IOOO 7)131 L*3 
2006 IF 5000 THEO L>3 
20M IF S<IO 7)0 L'O 

2010 p<inisiiooo)-iinistiooiiioi 
2012 S*ini5IIOO) 

2014 IF P>4 7)0 S>S«I 
2016 54/100 

2020 OEA -5-P ■4* ou ‘.OO*- 

2024 5t>S7RII5l 

2026 C4ERISII 

2028 IF DB-L 7)0 BETUIM 

2030 IF E>8-L 7)0 5l*3lr'0' 

2032 IF E-6-L 7)0 Bl'SIf.OO’ 

2034 RETUn 


CREA DATA 


Jacques TALLONE 


P our une raison qui vous est propre (et que nous ne discuterons 
pas I), vous désirez transférer une zone mémoire contenant des 
octets ou du langage machine, dans les lignes DATA d'un programme 
Basic. Prenez la peine de taper le programme ATMOS ci-dessous et, 
grâce à Jacques TALLONE, le tour est joué I 


63000 ' 

63001 ' 

CREA-DATAS 

63002 ' 
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63003 

63004 

63005 

63006 

63007 

63008 

63009 

63010 
6301 1 

63012 

63013 

63014 

63015 

63016 

63017 

63018 

63019 

63020 

63021 

63022 

63023 

63024 

63025 

63026 

63027 

63028 

63029 

63030 

63031 

63032 

63033 

63034 

63035 

63036 

63037 

63038 

63039 

63040 

63041 

63042 

63043 

63044 

63045 

63046 

63047 

63048 

63049 

63050 

63051 

63052 

63053 

63054 

63055 

63056 

63057 

63058 

63059 


' ' Jacques Tallone 06/01/85 

/ 

' - Ce programme se charge de 
' récupérer des codes machine 
' en mémoire et de les mettre 

' dans des 1 ignés de DATAs. 

/ 

' - La première 1 igné contient 
' l'adresse de départ de la 

' zone recupere'e. 

/ 

' - La derniere ligne de DATAs 
' est termines par une etoile. 

' Voir exemple en 63108. 

/ 

' - Ce programme doit etre 
' adapte en fonction de la 
' nature des données a récolter 

' (caractères, code machine...) 

/ 

' ATTENTION : La routine n'est 
' pas compatib le 

' avec l'ORIC-1 car 

' elle utilise le 

' vecteur ($023B) 

' de 1 a routine 

' "GTORKB". 

/ 

' - Son utilisation est très 
' simple. Il suffit de le 
' charger et de repondre a 
' ses diverses questions. 

' (La zone a recopier doit 

' etre protegee.) 

/ 

' CODES MACHINE DE LA ROUTINE % 

t 

' A2 34 AO 00 4C BD C4 A9 78 8D 

' 3C 02 A9 EB 8D 3D 02 A9 7D 85 

' 33 A9 F6 85 34 20 B3 C6 18 A5 

' CE 69 OB 85 CE 90 02 E6 CF 68 

' 68 68 68 68 68 A9 C9 48 A9 11 

' 48 A5 CE 85 E9 A5 CF 85 EA 60 

/ 

TEXT:CLS: PAPER 0:INK 7 :POKE 48035,0îPOKE 618,3 

PRINT CHR$(4):PRINT TAB(14);CHRi(27);"JCREA-DATAS";CHRt(4) 

PRINT @ 2,6;"Definissez la zone a recopier 

PRINT @ 2,8;CHRt(14);"Adresse début ";:INPUT ADîPRINT 

IF AD<0 OR AD>65535 THEN 63050 

PRINT © 2,9;CHRi(14);"Adresse fin ";:INPUT AFiPRINT 

IF AF<0 OR AF>65535 OR AF<AD THEN 63052 

PRINT @ 2,12)"Donnez l'adresse de la première ligne" 

PRINT @ 13)CHR$(14))"de DATAS ";:INPUT PL:PRINT;IF PL<0 OR PL> 

62999 THEN 63055 

PRINT @ 2,15iCHR$(14))"DonneZ le pas d'incrémentation 
INPUT PA:PRINT 

IF PA<1 OR PA>100 THEN 63056 

ND=AF-AD+1:NL=ND/20:NL=INT(NL)-(NL<>INT(NL))+l:DL=PL+(NL-1)*PA 
IF DL<63000 THEN 63062 
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63060 

63061 

63062 

63063 

63064 

63065 

63066 

63067 

63068 

63069 

63070 

63071 

63072 

63073 

63074 

63075 

63076 

63077 

63078 

63079 

63080 

63081 

63082 

63083 

63084 

63085 

63086 

63087 

63088 

63089 

63090 

63091 

63092 

63093 

63094 

63095 

63096 

63097 

63098 

63099 

63100 

63101 

63102 

63103 

63104 

63105 

63106 

63107 

63108 

63109 

63110 

63111 

63112 

63113 

63114 

63115 

63116 

63117 


PRINT g 2,18;"RECUPERATION IMPOSSIBLE AVEC CES PARAMETRES." 

WAIT 200:GOTO 63047 

DOKE #228,AD:D0KE #22A,AF:D0KE #22C,PL:P0KE #22E,PA 
PRINT @ 2,18;"La routine est implantée a partir de " 

PRINT "l'adresse #B800.":AR=#B800 
POKE 618,10 

NA=#501:REPEAT:CA=NA:NA=DEEK(CA);L=DEEK(CA+2):UNTIL L=63040 
REPEAT:ZCt = "": FOR PTR=CA+5 TO NA-2:ZA$=CHR$(PEEK(PTR)) 

IF ZA$<>" " THEN ZC$=ZC$+ZA$ 

NEXT PTR 

FOR K=1 TO LEN(ZC$) STEP 2 
POKE AR,VAL("#"+MID$<ZC$,K,2)) 

AR=AR+1INEXT K 

CA=NA:NA=DEEK(CA):UNTIL AR>#B83B 
ADf=MID$(HEX$(AD),2) 

IF LEN(AD$)<4 THEN AD$ = "0"+AD$: GOTO 63075 ELSE AD$ = "#"+AD$ 

POKE #22F,l:GOTO 63095 

DOKE #22C,DEEK(#22C)+PEEK(#22E) 

AD$="":F0R 1=1 TO 20 

TP=PEEK(DEEK(#228)):TP$=MID$(HEX<(TP),2) 

IF LEN(TP$)<2 THEN TP$="0"+TP$ 

AD$=AD$+TP$+"," 

DOKE #228,DEEK(#228>+1 

IF DEEK(#228)>DEEK(#22A) THEN I=20 :AD$=AD$ + "*," 

NEXT I 

ADt=LEFT$(AD$,LEN(AD$)-l) 

POKE #22F,2:GOTO 63095 
IF DEEK(#228)<DEEK(#22A) THEN 63077 
PRINT @ 2,22;"Récupérâtion terminée." 

PRINT © 2,24;"Une autre récupération ? "; 

GET ZA$:IF ZA$<>"0" AND ZAi<>"N" THEN PRINT:GOTO 63090 ELSE PRINT 
ZA$ 

IF ZA$="0" THEN 63047 

NA=#501:REPEAT:CA=NA:NA=DEEK(CA):L=DEEK(CA+2):UNTIL L=63000 
DOKE CA,O:DOKE #9C,CA+2 

CLEAR:CALL 583 
/ 

' IMPLANTATION 
/ 

PKi=STR$(DEEK(#22C))+"DATA "+AD$+CHR$(0) 

DOKE #023C,#B807 

FOR 1=1 TO LEN(PK$):POKE #34+I,ASC<MID$(PK$,I,1)):NEXT I 
CALL #B800 

ON PEEK(#22F) GOTO 63077,63087 
/ 

' LIGNE 63041: 7D } F6h*256d 
' " 63042: F6 } +7Dh=63101d 

' " 63043: OB=LONGUEUR DE LA LIGNE 63101 

/ 

' Exemple de programme de 

' lecture des DATAs : 

/ 

' 100 READ ADR 

' 110 REPEAT:READ A$ : IF = 

' 120 A=VAL("#"+Ai):POKE ADR, 

' 130 UNTIL A$ = ":t:" 

' 140 DATA #0400 

' 150 DATA 20,9F,FA,60,* 


" THEN 130 
A :ADR=ADR + 1 
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abonnement 

JE M'ABONNE A LA REVUE THEORIC POUR 11 NUMEROS DU N*_ 

AU N*_ 

IL ME MANQUE LE NUMERO 4 5 6 7 J'AJOUTE 30^00 FRANCS 
PAR REVUE 

IL ME MANQUE LES NUMEROS 1, 2, 3, J'AJOUTE 20,00 
FRANCS PAR REVUE 

ATTENTION: pour les mois de Juillet et Août, il n'y a qu'un 
numéro 

Ci-joint un chèque (libellé à l'ordre de SORACOM 
SARL) d'un montant de. 

NOM.PRENOM. 

ADRESSE . 

CODE POSTAL. 

VILLE . 

PAYS . 

SIGNATURE. 

RETOURNER LE BULLETIN A: 

EDITIONS SORACOM -SERVICE ABONNEMENTS THEORIC 
LE GRAND LOGIS - l6 AVENUE DU GENERAL DE GAULLE 
35170 BRUZ 




r 


L 


O 

îâ 


ÀNNÔNCÉZ^VOÜST ■ ■ 1 

les petites annonces et les messages | 

. - i..... ^ i ^ i _L_. i I_i ^ _j I 

__i—■—i—1—.—_1_*_1__—i— k —____1___ i _i_._1_ ■ I 

COUPON A RENVOYER AUX EDITIONS SORACOM 16 A, AVENUE GROS MALHON - 35000 RENNES ' 

_ACOOM^NJ_0'I^CHJQUEOE 30F. i^0RD_RE_DE ^AÇOM_ ~ ^ _j 

CoUaborâteur THEORIC vand Vends Irantceiver Kenwood TS 430SP, filtre 


ccipatible APPLE ][«’ équipé 
de 2 Drives, des caries 
iepriaante // et couleur RGB 
Servi seuieaent 3 toi s 
PRIX 9C00 Francs. 

Tel: (99).52.98.11 ou 98.02 


CW 170 Hz et affichage 10 Hz : 7000 F. 
MARCHEWKA, FE6CBA, 6 rue des Ormeaux, 
54420 Puinoy. 

Vends Sommerkamp 788 DX CC 26 à 
30 MHz. FM, BLU, CW. 100 W, aff. digital, 
Konner, duplex : 3000 F 6 débattre. Tél.: (62) 
07.03.44 après 20 h. 


Vends scanner Regency M100E 66-512 MHz 
en 3 bandes. 10 mém. progr., arrêt autom., 
priorité, etc. Alim. 12 V et secteur : 2000 F 
franco 6 débattre. Tél.: bureau (56) 06.64.43 
poste 1127, perso (56) 57.68.47 oprès 20 h 
F9UQ. 
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Oric pour tous • Cric I 
et Almos 

par Scyphiv Brcbum 
vt lai qucs Boisgontn^r. 

VtHJS jMiurrt*/ .ifxir<h*f la « maKii* » 
cit’ rOfic, l(*s Kr.iphiqm*s H les 
sons, grâce aux nombreux exem¬ 
ples Illustre^ et aux programmer 
direclemeni lommenltr. Sur nr 
bases, il vous st*ra aisé ci'.ippro- 
tundir vos connaissances ei 
d'écrire vos propres programmer 
gestion. enscMgnt'ment*. m*iix 

17hp.igcr 105,00 FF 

52 programmes Oric pour t(»us 
par /af(/utr Boisgotuivr 
Faisant suite à l'ouvrage «One I 
pour tous» ce recueil s'articule 
sur quatre thèmes . • Exercices, 
utilisant lcr fonctions particulières 
de l'Oric I lellcr que Kl YS. Pt OT , 
FILL.. • Éducation, profX)sanldir 
idtnr de programmer de gcM>gra- 
phte. orthr)graphe. anglais, der- 
sins... • C'icriion. développ<»nt 
qut*lqucr exemples du type an¬ 
nuaire téli*phonic]ue • |e»ux . Al- 
lunM’ltes. le compte est bon, bio¬ 
rythmes, )t*u de la vie. v sont trai¬ 
ter avc*c originalité 

IMpagcr 105.00 FF 


la découverte de l'Oric- 

Oric 1 et Atmos 

par Dantt'I-lvan Davref. 

L'Oric ert un ordinateur indivi¬ 
duel ciui tx'rmet à la fois ckr appli- 
c allons sérit*uses etdesieux. Ce 
livre d'initiation couvre lcr dt*ux 
aspects. Aprer une introduction 
former* de raptx'ls généraux sur 
riniormalique. il comprend cr- 
sentiellement une présentation 
progrersive du langage Basic . La 
de*couve*rte du langage* ert 
conduite en bâtissant des pro- 
gramnnr par améliorations suc- 
etrsiver au cours desquelles les 
notions nouve»lltr s'introduisent 
naturellement. On aborde spec ia- 
lement kr points fcKts de r(Jric : 
graphi()u(r. sons, coult*urs. 
horloge. 

I7t»pager 95,00 FF 

L'assembleur de l'Oric et Oric 
Atmos programmation en langage 
mac hine» par Marcel Hvnrot. 

Pour aborder cet ouvrage, vous 
èter suppKisc» connaître le langage 
Basic car l'initiation au langage 
mat hine se fait grât e â une trans¬ 
position progrersive du langage 
B.1SIC c*n langage machine. ()uel- 
quer rap(H*Is préliminaires portant 
principalemt‘nl sur les systèmes 


de numérotation et kr op<»rations 
arilhmelictucr et logiciucr vien¬ 
nent vous aider. Vous c‘tiidiere/ 
ensuite kr opérations de base, kr 
boucles, lcr comparaisons, kr 
Urts, la haute définition iH les ca¬ 
rat téristiciucr ma|t*urtr de l'Oric. 
Tout au long du livre, des exem- 
pkr et (kr exerciccr vous aidc*- 
ronl â etayer kr notions (]ue vous 
aurez appriscr. 

IbO pager -95.00- 
Clefs pour l'Oric - Oric 1 
et Almos 

f)ar tmmanuvi Hvisclles. 

C e memento pc*rrm*ltra â l'utilisa¬ 
teur de l'C )rit • I et Atmos d’accc*- 
der rapidement â toutes kr infor¬ 
mations dont il a bc»soin lors()u'tl 
se irouvt» devant son ordinati»ur : 
foncliorxneiTH'nt des mémoirrr 
écran, davier et programme, lan¬ 
gage assembleur du 6502. routi- 
nos de la R( )M avec l(»urs p«)ramé- 
trer. St h(*mas êlec troni(}U(r. 
tonnéeU*urs. syntaxe dtr instruc¬ 
tions Basic, messager d'err(*ur. 
et(, et egalement der astucir 
d'utilisation. 

12*4 pages- 105,00- 

L'Oric à l'affiche 

par Ivan-f ranr,ois Sehar). 

)e»an-François Se»ban vous pro¬ 


pose* le I une sélet tion de 20 pro 
grammer de* leux d'adrerse. de ré- 
tk*xion et de hasard, utilisant les 
possthilii(!r graphu^ucr et sonortr 
de* votre Oric. Dans un but péda¬ 
gogique. chaque programme ert 
ac compagne d'un organigramme, 
d'une liste de vanabkr e‘t d'une* 
explic ation de c haciue ligne Basic 
t>our l'adaptation éventuelle à 
d'autres ordinate‘urs. 

I i(i piigc»s 95,00 FF 

Boite* à outils pour Oric 
tome* I - 20 programmer 
par Michel \farfm. 

Les poss(*ss(»urs d’ordinateur 
Oric I ou Oric Almos trouveront 
dans te livre de pexhe de fx*lits 
pre^rammer ludlcfuer ou utililai- 
rer (graphictuer, ckrsins. musique, 
etc .1 é< riis e*n Basic. 

128 [xigir - 39.00- 

Boitp à outils pour Oric 
tome 2 * 20 programmer 
par Michel Martm. 

Tout comme le tome I. • Boite â 
outils pour One tome 2 » eontient 
de pe'tits programmer ludiquer ou 
utilitaires, écrits e*n Basic pour kr 
utilisalcursd'ordinateurCiric 1 ou 
One Atmos. 

128 page»s 39.00 - 


DEMANDEZ LES LIVRES P.S.I. A VOTRE LIBRAIRE- 


Le cahier du Basic sur Oric 
et Atmos 

par lacquvs Boisgixitier. 

Un<* initiation graphi(|ue au lan¬ 
gage Basic de rordinate‘ur indivi¬ 
duel Oric e*l One Atmos deslinex* 
au tout débutant. Lcr notions de 
basc*m<Kk*difecl, variables, bou¬ 
cles...) sont prtre*nté*er à l'aide des 
instructions graphiqutr haute et 
liasse résolution. [)er program¬ 
mer d'mitialion puis de jeux et de 
gertion vienne*nt compléter l’ap¬ 
prentissage. 

% pager 65,00- 


102 Programmes pour Oric Almos 
par Jacques De< onchat 
Cet ouvrage (ri derliné à vous ini¬ 
tier à la connaissance et â la maî¬ 
trise progressive de votre Oric At¬ 
mos à travers la réalisation et l'uti¬ 
lisation de jeux éli^menlaircr. Ltr 
programmer. r(*(iigésen Basic Mi¬ 
crosoft. sont ( lasser par niveaux 
croissants ck* difficulté, te premier 
niveau étant consacre aux ins¬ 
tructions élemenldirer de te* lan¬ 
gage. Chaque programme ert 
commenté, accompagné cK* sug- 
gertions pour des améliorations 
possible*s et suivi d'un (*xemple 
ci'e‘xé< ution. 

248 pagtr . 120,00 FF 
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Téléphone ; (2) 345.08.50 

P.S.I. SUISSE 

Case Postale • Route Neuve 
1701 Fribourg - SUISSE 
Téléphone : (037) 23.18.28 
C.C.P. 17 - 5684 

au CANADA ; SCE Inc. 

65. avenue F-fillside Montréal 
(Westmount) jT 

C^jébec H 32 1 Wî g 

Téléphone : (514) 935.13.14 

au MAROC : SMER DIFFUSION 
3. rue Chazza - Rabat 
Téléphone : (7) 237.25 


Envoyez ce bon accompagne* de voire réglement â P.S.I. DIFFUSION ou pour la Belgic|ue et le Luxembourg 
à P.S.I. BENELUX et pour la Suisse .) P.S.I. SIJISSE (voir table de conversions ci-conlrel. 


DÉSIGNATION 

PRIX 

















... TOTAL 



Nom. 


Adresse. 


Code postal L 
Ville_ 


□ 

□ 


Pjifmcni par ihpquc /om(. 

Paicmvrrl en ff par cane bleue VISA 
(à P.S.I. DIFFUSION uniqupmeni) 



Date d'expiralif)n\_ 


• Sui»v : 1.50 f 


futut iMivmi'nt 

pAi ijflv dv < trditi 


iÂCOuuJU 



































dessinez de '' ctèer vo»e 


métfab'e Ij 
éditeur gr. 

[tlippefs . 
loance ou 
Igarde vo' 
1 au* poss»' 

Ir.réateuj. 








